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Abstract 


This  report  describes  a  library  of  automated  diagnostic  test-programs  for  the 
real-time  input/output  section  of  a  digital  training  simulation  research  system. 
The  application  of  such  automated  tests  to  simulation-system  acceptance  testing 
is  explored.  Included  is  a  description  of  real-time  simulation  as  a  training  tech¬ 
nique  and  the  Real-Time  Simulation  Research  Systems  (RTSRS)  for  which  the 
test-programs  were  prepared.  Detailed  program  listings,  flow  charts,  and  abstracts 
of  each  test  and  of  utility  subroutines  are  also  provided. 
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SECTION  I. 

Introduction 

This  report  ( 1 )  describes  in  detail  a  library  of  automated  diagnostic  programs  for  the  input/ 
output  portion  of  a  Real-Time  Simulation  Research  System,  and  (2)  discusses  the  application  of 
such  a  library  of  programs  for  the  acceptance  testing  of  simulation  systems  and  subsequent  pre¬ 
ventive  and  diagnostic  maintenance. 

The  programs  were  designed  and  coded  to  operate  on  a  Raytheon  440  computer,  which  is 
part  of  the  Real-Time  Simulation  Research  System  in  the  Simulation  Techniques  Branch  of  the 
Aerospace  Medical  Research  Laboratories.  Their  functional  designs  are  applicable,  however,  to 
a  wide  range  of  digital  computers  and  associated  analog-discrete  input/output  equipment. 

This  report  includes  some  background  material  on  training-simulation  in  general  and  a 
description  of  the  Real-Time  Simulation  Research  System  for  which  the  programs  were  specific¬ 
ally  designed  and  coded.  The  programs  themselves  are  explained  from  the  functional  standpoint, 
including  the  objectives  and  specific  operational  features  of  each. 

The  described  diagnostic  programs  apply  only  to  the  real-time  input/output  portions  of  the 
simulation  system.  Their  recommended  use,  therefore,  is  to  supplement,  not  replace,  present  test 
procedures;  since  a  complete  test  must  naturally  include  computer  diagnostics  and  tests  for  non- 
real-time  input/output  equipment  used  in  the  preparation  of  programs. 
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SECTION  II. 


Training  Simulation 

The  type  of  simulation  referred  to  in  this  report  is  real-time  flight  simulation  for  training 
crews  in  the  operation  of  aerospace  vehicles.  A  flight  simulator  for  this  purpose  is  a  device  com¬ 
posed  chiefly  of  a  vehicle  cockpit,  an  instructor  station,  and  a  digital  computer,  all  interconnected 
through  various  input/output  devices  and  designed  to  replicate  the  vehicle  being  simulated  as 
closely  as  possible  from  an  operator’s  standpoint.  The  computer  is  programmed  to  solve  the  flight 
equations  of  the  vehicle,  process  the  inputs  from  pilot  and  instructor  controls,  and  generate  infor¬ 
mation  for  cockpit  and  instructor- station  displays.  On  the  basis  of  the  position  of  the  controls  and 
the  history  of  ffight,  the  computer  determines  various  vehicle  parameters  such  as  velocity,  altitude, 
position,  and  attitude,  and  feeds  these  computed  values  through  the  input/output  system  to  the 
pilot  and  instructor  instrument  pointers  and  indicator  lights. 

During  the  simulated  flight,  the  instructor  arbitrarily  introduces  through  his  console  various 
circumstances  such  as  icing,  rough  air,  or  system  malfunctions  which  may  be  encountered  during 
actual  flight.  The  computer  receives  these  inputs  and  alters  its  computations  to  simulate  the  ve¬ 
hicle’s  performance  under  these  conditions.  The  pilot’s  reactions  to  these  various  conditions  arc 
monitored  by  the  instructor.  Thus,  the  simulator  provides  a  means  for  training  crews  for  emer¬ 
gency  situations  which  may  be  too  hazardous  to  attempt  in  the  actual  vehicle.  The  overall  result 
is  a  duplication  of  the  actual  vehicle  being  simulated  that  is  realistic  to  the  trainee  and  which 
provides  an  effective  training  environment  if  properly  utilized. 

The  forerunner  of  the  complex  digital  flight  simulators  of  today  were  the  simple  air-activated 
instrument  trainers  of  World  War  II  vintage.  These  trainers  eventually  progressed  to  electrified 
models,  then  to  trainers  using  electronic  and  electromechanical  analog  computing  elements. 
Through  further  research  on  simulation  techniques  evolved  the  approach  of  using  an  aircraft 
mathematical  model  with  aircraft  data  programmed  on  a  special-purpose  analog  computer  to 
implement  a  full  mission  simulator. 

These  analog-computer-driven  simulators  were  very  effective;  however,  many  problems  arose 
when  changes  were  implemented.  The  characteristics  of  the  analog  approach,  having  an  equiva¬ 
lent  component  for  each  major  vehicle  component,  and  the  special-purpose  design  of  the  com¬ 
puter  made  simulator  changes  rather  difficult  and  time-consuming.  If  a  part  or  system  were 
added,  deleted,  or  replaced  in  the  vehicle,  the  analog  computer  would  be  affected  in  the  same 
manner.  In  addition,  other  undesirable  characteristics  such  as  poor  small-signal  response  and  per¬ 
formance  degradation  with  age  were  prevalent. 

With  the  advent  of  the  digital  computer,  the  feasibility  of  using  a  digital  computer  for  the 
central  computing  element  was  investigated,  using  the  same  mathematical  model  and  computer 
solution  approach.  The  digital  computer  was  investigated  primarily  because  of  its  prominent  ad¬ 
vantages  over  analog  computers,  such  as  programming  and  model  solution  flexibility  and  superior 
accuracy  and  resolution.  Its  flexibility  would  be  limited  only  by  any  special-purpose  restrictions 
imposed  on  its  design;  and  the  ease  with  which  the  program  could  be  changed  would  be  controlled 
chiefly  by  its  program  input/output  equipment  and  software.  The  desired  accuracy  and  resolu¬ 
tion  could  be  achieved  by  the  use  of  a  suitable  computer  word-length  or  by  double-precision  pro¬ 
gramming  techniques.  The  digital  computer’s  inherent  “go— no  go”  characteristics  also  offered  cer¬ 
tain  maintenance  advantages.  The  solution  would  be  consistently  accurate  from  one  day  to  the 
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next  and  would  not  be  affected  by  component  degradation;  however,  if  a  failure  did  occur  in  the 
computer,  the  entire  simulation  would  be  likely  to  fail. 

A  study  was,  therefore,  undertaken  to  determine  the  digital  computer  speed  and  other  char¬ 
acteristics  required  for  such  a  simulator.  It  was  determined  that  at  that  time  a  digital  computer 
of  the  required  capabilities  did  not  exist  as  a  state-of-the-art  device.  An  effort  was  then  initi¬ 
ated  to  design  such  a  computer.  A  digital  computer  of  the  established  design  was  constructed, 
programmed  to  simulate  a  high-performance  aircraft  (F-100A),  and  tested  to  prove  its  feasibility. 
This  system  was  called  the  Universal  Digital  Operational  Flight  Trainer  (UDOFT).  (See  refer¬ 
ence  7.) 

Several  years  after  the  UDOFT  program  was  successfully  completed,  commercial  computers 
capable  of  handling  such  a  simulation  became  available.  More  efficient  programming  techniques 
were  also  developed.  The  requirement  for  digital  computation  was  then  added  to  Air  Force 
simulator  specifications.  Today,  the  majority  of  Air  Force  aerospace  vehicle  simulators  being  pro¬ 
cured  are  required  to  be  activated  by  digital  computers. 
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SECTION  III. 


The  Real-Time  Simulation  Research  System 

To  enable  a  better  understanding  of  the  automated  diagnostic  test  programs  which  are  repre¬ 
sentative  of  the  type  recommended  for  use  in  simulation  system  acceptance  testing,  a  description 
follows  of  the  system  for  which  the  tests  were  prepared.  Parallels  may  be  drawn  between  this  sys¬ 
tem  and  others  to  observe  the  applications  which  may  be  made  of  at  least  the  functional  designs 
of  the  diagnostic  programs. 

The  major  components  of  the  system  which  has  been  named  the  Real-Time  Simulation  Re¬ 
search  System  ( RTSRS )  are  a  Raytheon  440  digital  computer  (ref  1 ) ,  an  Electronics  Associates 
TR-48  analog  computer,  and  some  special  analog  and  discrete  input/output  conversion  equipment. 
The  program  input/output  equipment  of  the  system  consists  of  a  magnetic  tape  unit,  a  paper  tape 
reader  and  punch,  an  on-line  typewriter,  a  high-speed  line  printer,  and  a  computer-controlled 
Cathode  Ray  Tube  (CRT)  display. 

The  primary  function  of  the  RTSRS  is  to  enable  the  Aerospace  Medical  Research  Labora¬ 
tories  to  conduct  applied  research  in  simulation  techniques  for  training  aerospace  crews.  Work 
currently  in  progress  which  involves  the  use  of  the  RTSRS  includes  the  development  and  imple¬ 
mentation  of  an  orbital-reentry  simulation  program.  This  program  will  be  used  in  studies  of 
hybrid  simulation  techniques,  numerical  integration  methods  for  real-time  simulation,  automatic 
monitoring  of  human  performance,  and  real-time  displays  for  training  purposes. 

Following  is  a  brief  description  of  each  equipment-component  of  the  RTSRS.  Since  the  TR-48 
analog  computer  is  not  used  by  the  automated  diagnostic  programs,  it  will  not  be  described  in 
this  report. 

RAYTHEON  440  DIGITAL  COMPUTER 

The  Raytheon  440  is  a  medium-sized,  medium-speed,  general-purpose  digital  computer.  It  is 
designed  to  permit  programming  at  several  levels.  The  machine  micro  language  may  be  used 
directly;  a  group  of  micro  coded  routines  may  be  used  to  make-up  various  macro  commands  or 
languages;  or  FORTRAN  programming  may  be  used.  The  micro  programming  feature  of  the 
computer,  which  permits  the  programmer  to  literally  define  his  own  command  set,  sets  the  Ray¬ 
theon  440  apart  from  and  above  other  general-purpose  digital  computers  in  which  the  (macro 
level)  command  set  is  fixed.  (See  reference  1.) 

Major  software  components  of  the  440  include  a  Micro  Assembly  Program  (MAP  440),  a 
FORTRAN  compiler,  and  a  macro  level  assembler.  The  latter  is  based  upon  a  Systems  Command 
Set  of  instructions  (ref  6)  designed  for  real-time  applications.  Accompanying  the  Systems  Com¬ 
mand  Set  assembler  is  a  Systems  Command  Set  Generator,  the  use  of  which  permits  the  program¬ 
mer  to  specify  which  commands  of  a  group  of  over  100  standard  commands  he  wishes  to  use  in 
his  program.  The  programmer,  however,  is  limited  to  64  commands  in  a  given  program.  The  Gen¬ 
erator  may  be  altered  to  permit  the  programmer  to  define  and  use  his  own  commands  which  may 
not  be  included  in  the  Systems  Command  Set.  The  alteration  may  be  quickly  accomplished  through 
a  conversational -type  program  entitled  the  Generator-Generator. 

Complete  diagnostic  programs  exist  for  all  peripheral  equipment.  Some  of  these  programs 
were  furnished  by  Raytheon  for  equipment  purchased  from  them  and  some  were  prepared  in- 
house.  An  extensive  library  of  utility  softwear  has  been  prepared  by  the  Aerospace  Medical  Re- 
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search  Laboratories  to  aid  in  standard  input/output,  program  debugging,  and  program  documen¬ 
tation.  Included  are  decimal  input/output  routines;  tape  reproducers;  I/O  commands  for  rapid 
access  to  the  printer,  punch,  typewriter,  and  magnetic  tape  unit;  source  program  listing  routines; 
special  commands  for  referencing  the  analog-discrete  input/output  system;  and  several  typewriter 
input  routines. 

The  computer  has  two  4K  modules  of  2-microsecond  cycle  time  memory  and  a  512-word 
module  of  1-microsecond,  nondestructive  access  memory.  The  two  4K  modules  comprise  what  is 
referred  to  as  main  memory,  which  is  normally  used  for  program  and  data  storage.  The  5 12- word 
module  is  referred  to  as  logic  or  fast  memory  and  is  where  the  micro  coded  macro-commands  and 
micro  coded  subroutines  are  normally  stored.  Main  and  fast  memory  may  be  expanded  to  28,672 
and  4096  words  capacity,  respectively.  (See  references  1  and  5.) 

ANALOG-DISCRETE  INPUT/OUTPUT  CONVERSION  EQUIPMENT  (ADIOCE) 

ADIOCE,  which  is  an  acronym  for  analog  and  discrete  input/output  conversion  equipment, 
is  a  special  device  which,  together  with  the  440  and  TR-48  computers,  makes  up  the  major  equip¬ 
ment  of  the  RTSRS.  It  provides  the  link  between  the  digital  computer  and  the  simulator  cockpit 
instruments  and  controls.  It  is  also  the  link  between  the  analog  and  digital  computers  for  use  in 
hybrid  computation  problems.  (See  reference  3.) 

There  are  6  major  sections  in  ADIOCE:  the  I/O  controller,  real-time  clock,  digital  to  analog 
converters,  analog  to  digital  converter  and  multiplexer,  discrete  inputs,  and  discrete  outputs. 
Prompted  by  the  appropriate  input/output  commands  in  the  440,  the  I/O  controller  selects  the 
proper  section  and  address  in  ADIOCE  and  causes  the  correct  function  to  be  performed.  The 
ADIOCE  I/O  controller  is  very  similar  to  all  other  440  I/O  controllers,  so  further  attention  will 
not  be  given  it  at  this  time.  The  remaining  five  sections  in  ADIOCE  are  briefly  described  as 
follows: 

REAL-TIME  CLOCK 

The  real-time  clock  is  used  most  often  for  controlling  the  iteration  rate  of  a  program  relying 
upon  real-time  inputs,  i.e.,  a  simulation  program.  It  has  also  been  used  as  a  timing  reference  for 
several  diagnostic  routines.  The  clock  may  be  set  under  program  control  to  intervals  ranging 
from  100  microseconds  to  1.6383  seconds.  The  contents  of  the  clock  may  also  be  read  under 
program  control.  A  100,000  CPS  crystal  oscillator  supplies  the  basic  pulse  rate  for  the  clock. 

Once  set,  the  clock  counts  continuously  and  supplies  an  interrupt  to  the  computer  once  every 
interval  when  the  clock  count  register  (CCR)  reaches  zero.  Upon  reaching  zero,  the  CCR  is 
automatically  loaded  again  with  the  previously  specified  interval  (retained  in  a  time  interval 
register  (TIR))  and  continues  to  count. 

DIGITAL  TO  ANALOG  CONVERTERS 

The  digital  to  analog  conversion  section  of  ADIOCE  is  composed  of  64  individual  D  to  A 
converters.  Fifty-six  of  the  channels  are  10-bit  bipolar  converters  and  eight  channels  arc  14-bit 
biopolar  converters.  The  10-bit  converters  are  adequate  for  most  of  the  standard  simulator  in¬ 
struments,  while  the  14-bit  converters  are  required  for  some  of  the  longer  scale  displays  spell  as 
vertical  tape  instruments.  The  larger  number  of  bits  arc  required  for  resolution  rather  than  ac¬ 
curacy,  because  with  a  larger  type  instrument  scale  and  a  short  word-length,  converter  changes 


5 


of  the  least  significant  bit  cause  quantitized  detectable  changes  on  the  instrument  rather  than  a 
smooth  movement.  The  high  precision  14-bit  converters  also  provide  a  standard  for  an  automated 
closed-loop  A  to  D  and  D  to  A  calibration  program. 

The  10-bit  converters  are  built  up  from  Computer  Control  Corporation  digital  modules.  Each 
channel  is  composed  of  a  10-bit  storage  register,  a  ladder  network,  and  an  isolation  amplifier.  The 
eight  14-bit  converters  are  composed  of  a  Packard  Bell  DAC  20  system.  The  output  voltage  range 
of  the  converters  is  d=10  volts,  with  a  full  positive  computer  word  corresponding  to  4-10  volts  and 
a  full  negative  2’s  complement  word  corresponding  to  —10  volts. 

All  of  the  input/output  sections  in  ADIOCE  with  the  exception  of  the  real-time  clock  can  be 
accessed  in  either  a  Random  or  a  Sequential  mode.  In  the  Random  mode,  the  address  of  every 
I/O  channel  must  be  supplied  to  ADIOCE  with  every  I/O  command.  In  the  Sequential  mode,  the 
address  of  the  first  channel  to  be  referenced  is  sent  during  the  selection  of  ADIOCE.  With  succes¬ 
sive  data  transfer  accesses  to  ADIOCE,  the  section  being  accessed  is  automatically  stepped  to  the 
next  higher  channel,  not  requiring  the  address  to  be  sent  along  with  each  access.  The  chief  ad¬ 
vantage  of  the  Sequential  mode  is  not  time  savings,  since  the  access  time  in  either  mode  is  ap¬ 
proximately  equivalent,  but  that  it  does  not  require  the  construction  of  a  channel  address  for 
each  access. 

ANALOG  TO  DIGITAL  CONVERTER  AND  MULTIPLEXER 

The  32  channels  of  analog  input  are  provided  through  the  use  of  a  12-bit  analog  to  digital 
converter  and  a  32-channel  multiplexer.  The  converter  is  a  Texas  Instruments  Model  834  and  the 
multiplexer  is  a  Texas  Instruments  Model  845A. 

In  addition  to  the  Random  and  Sequential  modes  mentioned  previously,  the  A/I  section 
can  be  accessed  in  a  Free  Run  mode.  In  this  mode,  immediately  after  an  access  the  A/I  section 
is  automatically  stepped  to  the  next  higher  channel  and  the  conversion  is  initiated.  The  computer 
is  free  during  the  actual  conversion  period  and  is  only  charged  for  the  data-transfer  time  during 
the  access.  This  is  only  true,  however,  if  the  time  between  accesses  is  greater  than  the  conversion 
time.  With  accesses  spaced  properly,  this  mode  will  permit  maximum  multiplexer  and  converter 
operation  rate. 

Although  2’s  complement  notation  is  normally  used  in  conjunction  with  ADIOCE,  a  Sign 
Magnitude  mode  of  access  exists  to  facilitate  scaling  operations  when  they  are  needed. 

The  input  voltage  range  of  the  A/I  system  is  also  4il0  volts. 


DISCRETE  INPUTS 

ADIOCE  is  capable  of  handling  72  discrete  inputs.  They  are  divided  into  three  groups  of 
24  each  and  brought  into  the  computer  one  24-bit  word  at  a  time.  The  bits  of  this  24-bit  word 
must  be  interrogated  separately  to  determine  the  state  of  a  particular  discrete  input.  This  can  be 
accomplished  by  masking  the  input  word  or  shifting  the  bits  to  a  position  in  the  word  that  can 
be  tested  by  a  standard  command. 

The  switch-inputs  connect  directly  into  ADIOCE  as  logic  levels  to  the  digital  modules,  with 
the  switch  providing  the  only  storage.  No  voltage  levels  are  required  to  be  routed  through  the 
switch;  it  provides  a  “one”  input  by  being  open  and  a  “zero”  input  by  being  switched  to  ground. 
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DISCRETE  OUTPUTS 

ADIOCE  is  capable  of  providing  70  external  discrete  outputs.  They  are  arranged  into  7 
groups  of  10  each  and  are  left  justified  in  the  computer  word.  The  discrete  outputs  are  in  the 
form  of  either  flip-flop  outputs  or  lamp  driver  outputs.  The  lamp  drivers  can  operate  incandescent 
indicator  lights  or  low  current  relays.  An  additional  group  of  10  discrete  outputs  is  used  to  pull 
special  mode  control  relays,  some  of  which  are  used  for  the  calibrate  mode  of  ADIOCE,  and  some 
for  the  analog  computer  mode  control. 

Since  the  discrete  outputs  are  sent  out  in  groups  of  10,  the  individual  outputs  must  be  set 
by  a  masking  or  shifting  technique  similar  to  that  used  for  interrogating  the  discrete  inputs. 
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SECTION  IV. 


Automated  Diagnostic  Test  Programs 

TEST  OBJECTIVES 

All  of  the  automated  diagnostic  tests  for  ADIOCE  except  the  calibration  test  were  written 
specifically  for  system  acceptance  testing.  The  ADIOCE  calibration  test  (reference  2)  was  writ¬ 
ten  by  the  system  contractor  as  an  initial  and  permanent  diagnostic  for  ADIOCE.  All  tests, 
however,  were  used  for  acceptance  testing  and  have  become  part  of  a  permanent  system-diag¬ 
nostic  library. 

The  diagnostic  tests  were  designed  to  be  as  automated  as  possible  with  respect  to  operator 
instructions,  execution,  and  result-recording  so  that  maximum  operational  efficiency  could  be 
achieved.  The  tests  proved  to  be  quite  useful  in  detecting  and  resolving  several  system  mal¬ 
functions  during  the  testing  phases.  Due  to  the  success  encountered  with  these  tests  and  the 
applicability  of  their  design  to  other  input/output  systems  and  computers,  they  are  described 
herein  as  an  example  of  tests  to  be  added  to  the  standard  simulator  system  acceptance  tests  and 
used  for  permanent  diagnostics  for  a  digital  simulator  system.  Similar  automated  techniques 
could  be  applied  to  other  areas  of  acceptance  testing,  i.e.,  simulator  model  testing.  Such  tests 
could  save  a  considerable  amount  of  test  time  while  providing  more  reliable  and  more  rapid  test 
results.  The  extra  effort  involved  in  the  preparation  of  such  a  battery  of  automated  tests  for  a 
single  simulator  may  be  greater  than  the  effort  saved  in  testing  in  some  cases;  however,  when 
several  simulators  of  a  similar  type  are  involved,  the  extra  effort  required  initially  may  be  well 
justified  on  a  time-savings  basis  alone,  in  addition  to  adding  increased  efficiency,  accuracy,  and 
reliability  to  test  procedures  and  results. 

TEST  DESCRIPTIONS 
1.  Discrete  Input/Output  Test 

This  test  provides  a  means  of  exercising  the  discrete  input  and  output  channels  in  a  closed- 
loop  fashion  to  determine  if  they  are  operating  properly.  For  this  test,  the  output  channels  are 
connected  to  the  input  channels  through  an  external  cable.  The  program  first  types  or  prints  the 
title  and  operating  instructions.  In  this  case,  the  instructions  are  for  the  operator  to  select  by  the 
use  of  sense  switches  whether  or  not  a  listing  is  desired  of  the  input/output  connections  prior 
to  test  execution.  This  list  is  useful  if  a  malfunction  is  detected,  in  that  the  output  as  well  as  the 
input  channels  involved  can  be  determined.  If  an  error  is  detected,  this  means  that  either  the 
input  or  its  associated  output  channel  are  malfunctioning.  This  ambiguity  can  be  resolved  by  the 
use  of  manual  discrete  input  switches  on  a  test  panel  in  ADIOCE.  If  the  test  responds  properly 
using  the  manual  inputs,  the  malfunction  is  in  the  output  channel;  otherwise,  it  is  in  the  input 
channel. 

The  test  sends  out  all  ones  and  all  zeros  on  the  output  channels  and  tests  for  the  same  on  the 
input  channels.  If  no  malfunctions  are  detected,  the  test  outputs  the  phrase  “End  of  Test”  and  the 
computer  halts.  If  a  malfunction  is  detected,  the  program  outputs  the  input  channel  number  as¬ 
sociated  with  the  malfunction  and  indicates  whether  a  zero  or  a  one  should  have  been  received. 
The  program  then  completes  the  test  and  outputs  “End  of  Test”  and  the  computer  halts.  (See 
sample  output  in  Appendix  I.) 
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2.  Discrete  Output  Dynamic  Test 

This  test  provides  a  means  of  dynamically  testing  the  discrete  output  channels.  For  this 
test,  an  indicator  lamp  is  connected  to  the  lamp  driver  of  the  discrete  output  channel.  The  pro¬ 
gram  begins  by  typing  the  test  title  and  operator  instructions.  The  operator  can  specify  a  single 
channel  or  all  channels  to  be  exercised  during  any  one  execution  of  the  program.  If  a  single  chan¬ 
nel  is  selected,  its  group  address  and  the  number  corresponding  to  its  position  in  the  group  must 
be  specified  through  the  typewriter.  The  test  then  asks  for  a  time  T  which  determines  the  rate 
at  which  the  channel  is  cycled  on  and  off. 

The  test  determines  whether  or  not  the  channel  functions  properly  under  load  and  whether 
the  selection  circuitry  selects  only  the  proper  channel.  Through  sense  switch  options,  the  oper¬ 
ator  can  enter  a  new  time  T,  restart  the  test  to  select  a  new  channel  or  all  channels,  or  indicate 
that  a  malfunction  has  occurred  on  the  channel  being  tested.  In  case  of  the  latter,  the  program 
records  the  malfunction  so  that  a  complete  and  permanent  copy  of  the  test  results  is  maintained. 
(See  sample  output  in  Appendix  I.) 

3.  Analog  Output  Accuracy  Test 

This  test  provides  a  means  for  measuring  the  accuracy  of  the  low  precision  and  high  pre¬ 
cision  digital  to  analog  converters.  The  equipment  required  for  this  test  is  a  high  precision  digital 
voltmeter  connected  to  the  channel  output  which  is  under  test.  The  test  title  and  operator  instruc¬ 
tions  are  supplied  to  the  operator  via  the  typewriter.  The  operator  types  the  address  of  the  chan¬ 
nel  to  be  tested. 

The  test  is  designed  to  automatically  record  all  results.  A  total  of  21  points  over  the  full  range 
of  the  converter  is  checked.  The  typewriter  types  the  voltage  and  the  computer  number  cor¬ 
responding  to  this  voltage  for  the  current  test  point.  With  the  voltmeter  connected  to  the  channel 
output,  the  computer  number  is  sent  to  the  converter.  If  the  proper  voltage  appears  on  the  chan¬ 
nel  output  as  observed  on  the  voltmeter,  the  computer  number  that  was  originally  sent  out  to 
produce  this  voltage  is  typed  as  the  number  required.  If  the  voltage  is  not  the  proper  value, 
the  output  number  is  slewed  by  the  operator  through  the  use  of  sense  switches  until  the  proper 
voltage  appears  on  the  channel  output.  When  the  proper  voltage  is  reached,  the  required  output 
number  is  typed  and  the  test  continues  to  the  next  test-point. 

The  difference  between  the  required  number  and  the  number  originally  outputted  is  the 
converter  error  in  least  significant  bits.  With  this  test,  the  entire  range  of  the  converter  can  be 
checked  and  the  results  recorded  in  a  matter  of  minutes.  This  test  can  be  used  to  select  one 
of  the  high  precision  converters  for  use  as  a  reference  in  the  analog  calibration  test.  ( See  sample 
output  in  Appendix  I.) 

4.  Analog  Output  Dynamic  Test 

This  test  provides  a  means  of  dynamically  testing  the  analog  output  channels.  The  test  first 
outputs  the  test  title  and  operator  instructions  through  the  typewriter.  The  program  then  sends 
information  to  the  selected  analog  output  channel  which  should  produce  a  square  wave  on  the 
output  of  this  channel.  The  amplitude  and  period  of  the  test  signal  are  controllable  by  either  of 
two  methods:  one  is  through  typewriter  inputs,  where  the  amplitude  and  period  are  typed  in; 
the  other  is  through  the  use  of  two  analog  input  channels.  If  the  latter  method  is  used,  the  op¬ 
erator  may  request  a  type-out  of  the  current  amplitude  and  period  any  time  during  the  test. 


With  this  test,  the  frequency  response  of  the  analog  output  channel,  which  is  mainly  deter¬ 
mined  by  the  output  amplifier,  can  be  measured  and  the  dynamic  functioning  of  the  digital 
storage  register  and  converter  can  be  checked.  It  also  provides  a  means  of  easily  determining 
whether  the  selection  circuitry  selects  only  the  proper  channel. 

Through  sense  switch  options,  the  operator  can  enter  a  new  time  and  amplitude  to  alter  the 
test  signal,  restart  the  test  to  select  a  new  channel,  or  indicate  that  distortion  has  occurred  on 
the  channel  under  test.  In  case  of  the  latter,  the  point  where  the  output  was  considered  to  be 
distorted  was  arbitrarily  chosen  to  be  where  the  output  waveform  was  all  rise-and-fall  time.  The 
program  provides  a  printed  record  of  all  cases  of  distortion  to.  provide  complete  test  results. 
(See  sample  output  in  Appendix  I.) 


5.  Computer  and  Real-Time  Clock  Tests 

This  test  compares  the  operational  accuracy  of  the  computer  and  real-time  clocks  with  ex¬ 
ternal  timing  references.  There  are  three  parts  to  this  test:  one  checks  the  computer  clock  against 
two  types  of  external  references,  one  checks  the  real  time  clock  against  the  same  two  types  of 
external  references,  and  the  third  compares  the  computer  clock  with  the  real-time  clock.  The  two 
external  references  used  by  the  first  two  parts  are  a  60-cycle  line  and  a  sweep-second-hand  clock. 

For  the  computer  clock  part  of  the  test,  when  a  clock  reference  is  used,  the  program  cycles  in 
a  timing  loop  and  accumulates  time  in  1-second  intervals.  This  loop  time  is  determined  by  the 
instructions  in  the  loop  and  their  respective  execution  times.  Since  the  instruction  times  are  con¬ 
trolled  by  the  computer  clock,  the  program  measures  (indirectly)  the  computer  clock  rate.  The 
result  outputted  from  this  mode  is  the  accumulated  time  in  seconds.  Sense  switches  are  used 
to  initiate  and  terminate  the  timing  period. 

With  this  reference,  the  timing  period  should  be  approximately  3  hours  for  a  resolution 
of  0.01%. 

When  the  60-cycle  line  reference  is  used,  it  is  fed  in  through  a  discrete  input  channel  and 
its  time  is  accumulated  in  8.333-millisecond  intervals.  This  is  the  half-period  time  of  the  reference 
signal.  The  computer  timing  loop,  of  which  a  part  is  the  interrogation  of  the  reference  input 
channel,  has  a  1-millisecond  loop.  The  8.333-millisecond  interval  is  caused  by  the  reference  signal 
cycling  positive  and  negative  once  each  cycle,  and  the  interrogation  part  of  the  loop  tests  for  a 
change  in  the  input.  The  computer  loop  must  have  an  interval  less  than  this  so  as  not  to  miss 
the  reference  signal  change;  therefore,  the  interval  was  chosen  to  be  1  millisecond,  the  next  lowest 
power  of  10  of  1  second.  This  mode  is  also  initiated  and  terminated  by  sense  switches.  The  results 
outputted  are  the  reference  and  computer  clock  times  in  seconds  and  the  percent  error.  With  this 
reference,  the  timing  period  should  be  approximately  2  minutes  for  a  resolution  of  0.01%.  How¬ 
ever,  since  the  60-cycle  line  reference  is  more  accurate  over  an  extended  period,  approximately  2 
hours  should  be  used. 

The  real-time  clock  part  of  the  test  also  has  two  modes  as  above  and  is  identical  except  that 
a  time  interval  of  10  milliseconds  is  set  in  the  real-time  clock.  This  clock  provides  interrupts 
to  the  computer  at  the  interval  rate,  and  the  interrupts  are  accumulated  in  a  computer  register. 
The  program  output  results  are  in  the  same  form  as  the  computer  clock  part  of  the  test.  This 
test  not  only  checks  the  real-time  clock  for  accuracy  but  accesses  the  clock  in  most  of  its  usable 
modes,  thereby  testing  its  functional  characteristics. 
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The  third  part  is  a  test  to  cross-check  the  results  of  the  first  two  in  that  it  tests  the  computer 
clock  against  the  real-time  clock.  There  is  only  one  mode  to  this  part  and  the  outputted  results 
are  in  the  same  form  as  the  60-cycle  reference  mode  of  the  first  two  parts. 

Like  the  other  automated  diagnostics,  this  test  uses  conversational  programming,  providing 
complete  operating  instructions  and  hard  copy  results.  (See  sample  output  in  Appendix  I.) 

6.  ADIOCE  Calibration/Diagnostic  Program 

This  program  was  prepared  by  the  system  contractor,  Illinois  Institute  of  Technology.  For 
a  complete  description,  including  flow  charts,  the  reader  is  referred  to  a  documentation  report 
prepared  for  this  branch  entitled  “ADIOCE  Calibration/Diagnostic  Program  for  Real-Time  Train¬ 
ing  Simulation  Research  System.” 

This  program  provides  a  check  on  the  performance  of  the  analog-to-digital  converter  (ADC) 
and  multiplexer  (MX)  and  the  digital-to-analog  converters  (DAC).  Also,  a  simple  check  is  made 
on  the  discrete  input/output  control  facilities. 

Tests  are  made  by  comparing  the  input  from  the  ADC  against  ( 1 )  bit  patterns  correspond¬ 
ing  to  known  voltage  sources,  either  signal  ground  or  output  from  a  high-precision,  hand-cali¬ 
brated  DAC;  or  (2)  bit  patterns  which  have  been  outputted  to  the  DAC  being  tested.  If  the 
difference  between  these  patterns  exceeds  prescribed  limits,  a  print-out  is  produced  listing  the 
test  being  made,  the  channel  used,  the  bit  pattern  inputted,  the  correct  bit  pattern,  and  the  abso¬ 
lute  value  of  their  difference. 

The  tests  are  arranged  so  that,  when  they  are  performed  in  their  normal  order,  no  part  of  the 
system  is  used  in  checking  out  another  part  until  its  own  .operation  has  been  verified.  If  the 
hand-calibrated  DAC  (one  of  eight  14-bit  DAC  selected  with  analog  output  accuracy  test)  is 
correct,  and  if  the  tests  are  performed  in  order,  any  failure  can  be  traced  to  the  defective  device. 
If  no  errors  are  indicated,  all  devices  are  functioning  within  the  prescribed  limits,  since  the  pro¬ 
gram  outputs  only  diagnostic  information  when  the  limits  are  exceeded. 

Before  the  tests  of  the  analog  equipment  begin,  ADIOCE  is  checked  for  status  response  and 
for  its  ability  to  return  an  EKO  signal  when  accessing  discrete  input  and  output  channels.  Then 
the  individual  tests  are  performed  in  sequence.  Following  is  a  brief  description  of  each  test; 

Test  1  — Zero  Offset  of  ADC:  The  signal  ground  is  connected  to  the  ADC,  a  conversion  is 
made,  and  the  output  is  compared  with  zero. 

Test  2  — Linearity  of  ADC :  The  reference  high  precision  DAC  is  connected  directly  to  the 
input  to  the  ADC,  bypassing  the  multiplexer.  The  program  cycles  through  all  pos¬ 
sible  14-bit  configurations,  sends  each  to  the  reference  DAC,  performs  conversion, 
and  compares  the  ADC  output  with  the  original  configuration. 

Test  3  — Zero  Test  of  Multiplexer :  The  signal  ground  is  conected  to  the  input  terminals  of 
each  of  the  multiplexer  channels,  and  a  conversion  is  made  through  the  ADC  for 
each  channel.  The  output  is  compared  with  zero. 

Test  4  — Linearity  of  Multiplexer  Test:  The  reference  high-precision  DAC  is  connected  to 
the  input  terminals  of  each  multiplexer  channel  in  turn,  while  the  program  cycles 
through  all  possible  14-bit  configurations.  Each  configuration  is  converted  to  a  voltage 
by  the  DAC,  and  an  AD  conversion  is  made  through  a  multiplexer  channel.  The 
output  is  compared  with  the  original  configuration. 
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Test  5  —  DA  Check ,  Low  Precision:  Each  of  the  low  precision  DAC  s  is  connected  to  one  of 
the  multiplexer  channels,  and  conversions  are  made  for  every  10-bit  configuration 
on  each  channel.  The  ADC  output  is  compared  with  the  original  configuration. 

Test  6  —  DA  Check ,  High  Precision :  Each  of  the  high  precision  DAC’s  is  connected  to  one 
of  the  multiplexer  channels,  and  conversions  are  made  for  every  14-bit  configura¬ 
tion  on  each  channel.  The  ADC  output  is  compared  with  the  original  configuration. 
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SECTION  V. 


Application  of  Automated  Diagnostic  Test  Programs 
to  the  Acceptance-Testing  of  Simulation  Systems 

CURRENT  ACCEPTANCE-TESTING  PROCEDURES 

Present  techniques  used  for  the  acceptance-testing  of  digitally-activated  flight  simulation 
systems  do  not  ordinarily  include  the  use  of  automated  diagnostic  routines  to  test  the  input/out¬ 
put  capabilities  of  the  system.  In  fact,  little  emphasis  is  placed  upon  testing  the  digital  computer 
and  associated  I/O  equipment  as  an  entity  independent  of  the  cockpit.  The  lack  of  emphasis  in 
this  area  is  probably  a  carryover  from  the  days  of  all  analog  simulation,  when  there  really  was 
no  simulator  input/output  equipment  and  the  entire  system  was  thought  of  as  a  single  piece  of 
equipment  — a  simulator  —  rather  than  a  computer,  input/output  equipment,  and  a  cockpit. 

Most  simulator  tests  are  conducted  in  a  manner  similar  to  that  of  flight  testing  an  actual  air¬ 
craft.  In  fact,  the  tests  are  often  designed,  outlined,  and  run,  by  the  airframe  contractor.  The  simu¬ 
lator  is  usually  “flown”  to  certain  altitudes,  power-settings,  orientations,  etc.;  then  human  stimuli 
are  applied  to  the  simulator  model  through  the  cockpit  controls,  and  the  performance  responses 
of  the  simulated  vehicle  are  observed  via  the  cockpit  instruments.  Primary  emphasis  is  upon  the 
performance  characteristics  of  the  simulated  flight  vehicle  as  observed  subjectively,  and  relatively 
little  attention  is  given  to  the  hardware  responsible  for  conveying  them  accurately  and  reliably 
from  computer  to  cockpit. 

A  more  desirable  procedure  for  model  and  simulation-program  testing  which  has  been  used 
in  the  testing  of  some  research  digital  simulators  consists  of  using  a  computer  controlled  test 
program.  This  type  of  program  automatically  initializes  the  simulator  to  specific  test  conditions, 
inserts  standard  computer  controlled  stimuli  in  the  simulation  model,  and  records  the  results  for 
evaluation.  This  method  is  very  desirable  not  only  because  of  its  increased  operational  efficiency, 
but  because  it  assures  more  validity  by  removing  the  human  element  from  the  test. 

Present  techniques  for  maintenance-oriented  diagnostic  testing  of  the  digital  computer  and 
input/output  portions  of  a  simulation  system  are  often  inadequate  and  difficult  to  apply.  The 
diagnostic  tests  required  and  provided  are  not  usually  automated;  as  a  result,  their  execution 
requires  a  great  amount  of  operator  intervention  and  console  monitoring.  In  fact,  these  diagnostic 
“tests”  are  often  not  supplied  as  computer  programs  but  instead  as  a  list  of  manual  procedures 
(which  could  just  as  easily  have  been  incorporated  into  a  computer  program).  Therefore,  the  en¬ 
tire  diagnostic  facility  is  unsatisfactory  merely  because  it  is  so  difficult  and  time-consuming  to  use. 


THE  ADVANTAGE  OF  USING  AUTOMATED  DIAGNOSTIC  TEST  PROGRAMS 

The  use  of  automated  diagnostic  programs  for  the  real-time  input/output  portion  of  a  digital 
simulation  system  would  greatly  simplify  the  task  of  running  acceptance  tests  on  this  portion. 
This  is  obvious,  since  the  test  programs  as  described  in  this  report  are  designed  to  require  as 
little  operator  effort  as  necessary.  Further,  tests  such  as  those  described  would  check-out  the 
real-time  input/output  hardware  thoroughly  and  would  thus  enable  more  rapid  isolation  of  sys¬ 
tem  malfunctions  as  the  acceptance  testing  proceeded.  Their  use  would  eliminate  the  need  for 
trial -and -error  troubleshooting  of  the  real-time  input/output  equipment  each  time  it  was  sus¬ 
pected  that  a  malfunction  existed  in  that  equipment. 
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A  second  important  advantage  of  using  automated  diagnosties  is  that  their  use  would  not  be 
limited  to  the  acceptance  testing  of  the  simulator,  and  their  development  would  therefore  be  justi¬ 
fied  on  two  accounts.  These  test  programs  could  be  used  by  personnel  in  the  field  for  preventive 
maintenance  checks  and  regular  system  diagnostics  after  the  simulator  is  in  operation.  Further, 
because  of  the  simple  operational  features  of  the  tests,  using  personnel  would  not  need  to  be 
familiar  with  detailed  aspects  of  the  computer  or  the  real-time  input/output  hardware. 

The  application  of  automated  diagnostic  test  programs  in  general  is  not  limited  to  real-time 
input/output  equipment.  Automated  tests  could  be  prepared  for  nearly  every  portion  of  a  simula¬ 
tion  system,  including  the  mathematical  vehicle  model  itself  but,  perhaps,  excluding  certain  hu¬ 
man  engineering  features  of  the  total  system. 
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Appendices 

Appendices  I  and  II  consist  of  detailed  descriptions  of  the  automated  diagnostic  tests  pre¬ 
pared  for  ADIOCE.  The  descriptions  are  composed  of  abstracts,  sample  output,  flow  charts,  and 
assembled  program  listings.  The  format  of  the  abstracts  was  designed  for  file  records  of  computer 
programs.  Essentially,  the  abstracts  explain  the  function  or  purpose  of  the  program,  a  sketch  of 
the  techniques  used  in  accomplishing  the  purpose,  operating  procedures,  and  computer  storage 
requirements  and  allocations. 

In  the  assembled  program  listings  produced  by  the  micro  assembler,  MAP-440,  the  left-most 
number  is  the  internal  address  of  the  corresponding  micro  pair  and  the  next  number  is  the  octal 
equivalent  of  the  micropair.  These  are  followed  horizontally  by  the  micro  command  and  the 
comments. 

For  uniformity,  all  of  the  test  programs  are  coded  to  begin  at  location  70,1008  and  execute 
from  logic  memory.  Since  many  of  the  tests  use  common  subroutines,  these  are  stored  at  fixed  loca¬ 
tions  for  all  diagnostics  and  are  discussed  as  a  group  in  Appendix  II. 

All  the  tests  are  coded  on  the  micro  or  machine  level.  A  brief  description  of  the  micro  com¬ 
mands  used  in  the  coding  will  be  found  in  Appendix  III.  (See  reference  4.)  Appendix  IV  con¬ 
tains  a  list  and  brief  description  of  the  Systems  Command  Set  instructions,  presented  here  to 
supplement  the  abbreviated  description  of  the  Raytheon  440  computer  software  discussed  in 
the  text.  (See  reference  6.) 


15 


Appendix  I 


AUTOMATED  DIAGNOSTIC  TEST  MAIN  PROGRAMS 
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PB-440  PROGRAM  ABSTRACT 


PROGRAM  TITLE: 

PROGRAMMER: 

DATE: 

ID: 

FUNCTION: 

TECHNIQUE: 


LOADING  PROCEDURE: 

OPERATING  PROCEDURE  & 
LINKAGE  REQUIRED: 

PROGRAM  STORAGE: 


INTERMEDIATE  STORAGE: 


SPECIAL  STORAGE: 
EXECUTION  TIME: 
REGISTERS: 


DISCRETE  INPUT/OUTPUT  TEST 
P.  A.  KNOOP 
10  March  1965 
None 

The  purpose  of  this  program  is  to  test  for  accuracy  all 
discrete  I/O  bits  in  the  PB-440  ADIOCE  system.  This  is 
one  of  the  ADIOCE  Acceptance  Test  programs. 

The  program  outputs  all  zeros,  then  all  ones,  to  all  bits 
in  DSO  groups  1-8.  The  DSI  groups,  linked  physically 
with  the  DSO  groups,  are  then  tested  for  the  correct  re¬ 
sponse.  In  the  event  of  an  error,  the  program  outputs  the 
DSI  group  and  bit  number  at  which  the  error  occurred. 

Load  with  Binary  Loader  I.  The  program  is  not  re¬ 
locatable. 

The  DSI-DSO  linkage  must  be  established  prior  to  execu¬ 
tion.  Once  the  program  is  initiated,  no  special  console 
monitoring  is  required.  Prior  to  execution  one  of  two 
sense  switches  must  be  set,  depending  upon  the  output 
mode  desired,  i.e.,  typewriter  or  line  printer. 


Program  Segment 

Octal  Locs. 

Total 

Main  Program 

70100-70210 

111 

Micro  Print 

400-426 

27 

Micro  Type 

450-461 

12 

Comments 

1000-1775 

776 

1150s 

Working  Storage: 

0  Address  of  selected  output  routine 

1  Save  D  register  during  error  routine 

2  Save  A  register  during  error  routine 

3  Save  D  register  during  error  output 

4  Storage  of  output  word  in  error  routine 

None  used 
Not  applicable 
All  used 
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SENSE  SWITCHES: 


I/O  DEVICES: 

PROGRAM  FLAGS: 
PROGRAM  HALTS: 


4A 


20 


DOG 

7,8 


8 


24 


DIG 

3 


1  Typewriter  output 

2  Line  printer  output 

5  DS1-DSO  connections  output 

6  No  DSI-DSO  connections  output 

Typewriter 
Line  Printer 
ADIOCE 

1  On  if  outputting  zeros,  off  if  outputting  l’s 

3  On  if  error  has  occurred 

701  (X)  Test  completed 


CONNECTOR  AND  CABLE  DIAGRAMS 
FOR  DISCRETE  INPUT-OUTPUT  TEST 


3 A  2A  1A 


20 

20 

20 

20  pin  receptacles 
in  Bay  A;  also 
receptacles  IB,  2B, 
3B,  and  4B  in 
between  the  ones 

DOG 

5,  6 

DOG 

3,  4 

DOG 

1,2 

shown. 

7 


48 


DIG 
1,  2 


20  Pin  Plugs  in  Bay  C 


19 


VIII 


K 


>o 


> 


> 


o 

Q 


o 

a 


O 

a 


O 

a 


O 

a 


a 


CN 


20 


CONNECTOR  CHART 


DI  I  m  Bay  C  Connector  7  To 
DO  I,  II,  and  III  in  Bay  A  Connectors 
I A  and  2  A. 
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CONNECTOR  CHART 


DI  II  in  Bay  C  Connector  7  To 
DO  III,  IV,  and  V  in  Bay  A  Connectors 
2A  and  3A. 
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CONNECTOR  CHART 


DI  III  in  Bay  C  Connector  8  To 
DO  V,  VI,  VII,  and  VIII  in  Bay  A 
Connectors  3A  and  4A. 
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DISCRETE  INPUT-OUTPUT  TEST 


24 


25 


26 


27 


4 


28 


29 


ldr 

9 

discrete  i/e  test 

ldr 

9 

15  FEBRUARY  1965 

LDR 

* 

L6C0  70100 

70100* 

02704604 

CTS  7  Q 

9 

TURN  0FF  ALL  TOGGLES 

CPL  Q  D 

s. 

D  ■  0 

70101* 

37321602 

TCT  SW  2 

9 

L00P  UNTIL  9UTPUT  MODE 

FTR  2 

9 

IS  SELECTED 

70102* 

35311476 

TCF  SW  1 
BTR 

70103* 

07500000 

CLD  0  50 
N0P 

9 

D  .  50  F0R  TYPE  0PTI0N 

70104* 

26735543 

LDI  P  C 

adl  o  c 

70105* 

00000400 

0000 

0400 

70106* 

21034573 

STW  0  C 

9 

ADDRESS  0F  SELECTED 

1XC  P  c 

OUTPUT  ROUTINE  TO  WSO 

70107* 

03201000 

0320 

1000 

9 

C0NTR0L  W9rD  F0RMAT  l 

70110* 

37361605 

TCT'  SW  6 
7TR5 

.M. 

TABLE  N0T  DESIRED 

70111* 

35351476 

TC£_SM  5 

BTR  1 

70112* 

23034573 

LOW  0  C 
£XC  P  JL 

9 

TABLE  IS  DESIRED 

70113* 

37301032 

3730 

M  -  - 

CONTROL  WORD 

1032 

9 

F0RMAT  2 

70114* 

23034573 

LOW  0  C 

EXC  P  £ 

70115* 

26101425 

2610 

1425 

70116* 

46020000 

CPL  ®  B 

NSP 

9 

B  ■  0 

70117* 

26731233 

LDI  P^Oi. 

SEl  c  c 

9 

select  adioce 

70120* 

32002060 

3200 

9 

SEQUENTIAL 

2060 

M 

channel  6q 

70121* 

6^6 1 4604 

£0M  6 A 

M 

LfiClt  CAM  JJ  Ol 

CPL  •  D 

30 


70122* 

10625244 

DTR 

6 

B 

9 

DTR  TB  AD  I  BCE 

CIX 

D 

D 

7jQJ.23* 

3 1 0  7.1426- 

TMF 

Q 

7 

9. 

D  EXP  ■  I0?t 

BTR 

1 

B 

NB 

70124* 

44042673 

CIL 

8 

D 

9 

YES  -  SET  D  T9  1 

LD! 

P 

C 

—7-0125  *  _32  0  02  0  2 1  __ 

- 3200 

sequential 

2021 

B 

Channel  21 

70126* 

12330000 

sel 

C 

C 

B 

SELECT  ADlBCE 

N0P 

_7fl  127  *_ 

65611051 

CBM 

6 

A 

B 

L0CK  CBM  TS  01 

DTR 

5 

A 

B 

DTR  FR0M  AD  I  BCE 

70130* 

37016311 

TCT 

PF 

1 

B 

PF  1  BN?? 

CCL 

A 

A 

B 

YES  -  C6MPLEMENT  INPUT 

70131* 

3>  017 1605 

TNZ 

A 

SXF 

B 

A  >  0?? 

FTR 

5 

9 

N0  -  I NCBRRECT  RESPONSE 

70132* 

52443137 

CIX 

D 

D 

9 

YES 

TMF 

3 

7 

9 

D  EXP  *  3?? 

70133* 

14734444 

BTR 

4 

9 

N0 

CIL 

D 

D 

9 

D  •  D  ♦  1 

70134* 

37011645 

TCT 

PF 

1 

9 

YES  -  PF 1  0N?? 

FTR 

37 

9 

IF  SB*  FINISHED 

70135* 

36016302 

ST  T 

PF 

1 

9 

IF  NBT*  SET  PF 1  BN 

CCL 

8 

8 

9 

b  .  all  ones 

70136* 

14600000 

BTR 

15 

N0P 

70137* 

21142121 

STW 

1 

D 

• 

ERR0R  R0UTINE 

STW 

2 

A 

9 

SAVE  D  AND  a 

70140* 

26734U3 

LD  I 

P 

C 

ADF 

D 

C 

70141* 

60606000 

6060 

6000 

70142* 

26752553 

LD  I 

P 

L 

STM 

L 

C 

70143* 

00001716 

0000 

• 

ADDRESS  F0R  STORAGE 

1716 

9 

0F  DS I  GR6UP  NUMBER 

70144* 

23034573 

ldw 

0 

C 

EXC 

p 

C 

70145* 

01101706 

0110 

• 

C0NTR6L  WORD 

1706 

9 

FORMAT  3 

70146* 

37011603 

TCT 

PF 

1 

FTR 

3 

31 


70147*  23034573  LDH  0  C 

EXC  P  C 


70150* 

01701717 

0170 

9 

CONTROL  WORD 

— 

1717 

9 

FORMAT  4 

70151* 

16020000 

FTR  2 

NOP 

70152* 

23034573 

ldw  0  c 

EXC  P  C 

70153* 

01701736 

0170 

S 

CONTROL  WORD 

1736 

9 

FORMAT  5 

70154* 

46043603 

CPL  •  D 

• 

D  ■  0 

STT  PF  3 

PF3  INDICATES  ERROR  HAS  OCCURRED 

70155* 

23213014 

LDW  2  A 

TNZ  A  s 

• 

A  SIGN  t  0?t 

70156* 

16070000 

FTR  7 

NOP 

• 

YES  -  THIS  0 I T  IN  ERROR 

70157* 

44442673 

CIL  D  D 

LDI  P  C 

70160* 

77777750 

7777 

7750 

9 

-  24.0 

70161* 

55433234 

adl  P  c 

9 

C  ■  D  -  24 

TZO  C  S 

9 

IS  C  POSITIVE?? 

70162* 

23141447 

LOW  1  D 
BTR  24 

9 

YES  -  FINISHED 

70163* 

23210501 

LON  2  A 
LRC  1 

9 

NO 

70164* 

66312121 

SSL  LOL  A 
STW  2  A 

9 

SHIFT  WS2  LEFT  1 

70165* 

14670000 

BTR  6 

NOP 

70166* 

21344642 

STW  3  D 

9 

type/print  Routine 

CPL  D  B 

9 

BIT  NUMSER  10  B 

70167* 

46012673 

CPL  Q  A 
LDI  P  C 

9 

A  .  0 

70170* 

77777766 

7777~ 

7766 

9 

-  12 

70171* 

05271731 

LRC  23 

9 

N  •  23 

D VS  C  A 

9 

GET  DECIMAL  BIT  NUMBER 

70172* 

26736722 

LDI  P  C 
SL6  B  B 

70173* 

60000052 

6000 

32 


0052 


70174* 

67226423 

SL6  8 
L0r B 

CD  (J 

70175* 

67116413. _ 

SL6  A 

A 

L0R  A 

c 

70176* 

21430000 

STN  4 

c 

9 

OUTPUT  H0RD  T0  WS4 

7Q17Z*  23034573  LDM  Q  C 

ExC  P  C 


70200* 

00100174 

0010 

9 

NS4  OCTAL  AODRESS 

6\7d 

AMO  N8 ,  NgRDS 

70201 • 

23341455 

iDW  3  B__ 

BTR  18 

70202* 

37031602 

TCT  PF  3 

9 

P^3  ON?? 

FIR  2.  . 

70203* 

23034573 

LON  0  C 
EXC  P  C 

9 

NB 

70204* 

00701755 

0070 

9 

C0NTR0L  N0RD 

.  1755. 

_ 4 _ _ 

FORMAT  6 

70205* 

23034573 

LON  0  C 
EXC  P  C 

70206* 

01201764 

0120 

• 

CONTROL  NQRD 

1764 _ 

_ A  _ _ 

F0RMAT  7 

70207* 

27770100 

LDM  p  p 

9 

RETURN  T0  start 

HLT 

9 

and  halt 

70210* 

00070100 

0007 

_ 0100 _ _ 

LDR 

LOR 

9 

END  DISCRETE  1/0  TEST 

* 

00070100 

END0  70100 _  . 
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DISCRETE  1/0  test 

IE  0UT  PUT  0E  DISCRETE  1/0  C0NnECTI0NS  IS  DESIRED,  HIT  Sw5J 
IE  N0T,  HIT  SH6 • 


DISCRETE  1/0  C6NN6CT I 0NS 


DSI 

SRP.  BIT 


DS0 

GRP,  BIT 


DSI 

GRP.  BIT 


DS0 

GRP.  BIT 


DSI 

GRP.  BIT 


DS0 

Grp.  8 l T 


10  10 

1111 
12  12 

13  13 

14  14 

1  5  1  5 

1  6  1  6 

1  7  1  7 

18  18 

19  19 

1  10  2  0 

1  11  2  1 

1  12  2  2 

1  13  2  3 

1  14  2  4 

1  15  2  5 

1  16  2  6 

1  17  2  7 

1  18  2  8 

1  19  2  9 

1  20  3  0 

1  21  3  1 

1  22  3  2 

1  23  3  3 


2  0  3  4 

2  13  5 

2  2  3  6 

2  3  3  7 

2  4  3  8 

2  5  3  9 

2  6  4  0 

2  7  4  1 

2  8  4  2 

2  9  4  3 

2  10  4  4 

2  11  4  5 

2  12  4  6 

2  13  4  7 

2  14  4  8 

2  15  4  9 

2  16  5  0 

2  17  5  1 

2  18  5  2 

2  19  5  3 

2  20  5  4 

2  21  5  5 

2  22  5  6 

2  23  5  7 


3  0  5 

3  1  5 

3  2  6 

3  3  6 

3  4  6 

3  5  6 

3  6  6 

3  7  6 

3  8  6 

3  9  6 

3  10  6 

3  11  6 

3  12  7  0 

3  13  7  1 

3  14  7  2 

3  15  7  3 

3  16  7  4 

3  17  7  5 

3  18  7  6 

3  19  7  7 

3  20  7  8 

3  21  7  9 

3  22  8  0 

3  23  8  1 


*  N0  ERR0RS  DETECTED* 

END  EF  TEST  -  HIT  C0HP.  T©  RESTART 
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PB-440  PROGRAM  ABSTRACT 


PROGRAM  TITLE: 

PROGRAMMER: 

DATE: 

ID: 

FUNCTION: 

TECHNIQUE: 


LOADING  PROCEDURE: 

OPERATING  PROCEDURES  & 
LINKAGE  REQUIRED: 

PROGRAM  STORAGE: 


INTERMEDIATE  STORAGE: 


SPECIAL  STORAGE: 
EXECUTION  TIME: 
REGISTERS: 


DISCRETE  OUTPUT  DYNAMIC  TEST 
P.  A.  KNOOP 
15  February  1965 
None 

The  purpose  of  this  program  is  to  test  the  response  time 
of  the  discrete  output  channels  in  the  PB-440  ADIOCE 
system. 

This  program  performs  either  of  two  tests: 

( 1 )  Given  the  time  base  T,  it  outputs  to  all  DSO  groups 
alternating  l’s  and  0’s  and,  upon  request,  types  out 
an  error  message. 

(2)  Given  the  DSO  group  number,  the  output  word,  and 
the  time  base  T,  it  outputs  the  word  alternately  with 
its  complement  to  the  specified  channel  and,  upon 
request,  types  out  an  error  message. 

Load  with  Binary  Loader  I.  This  program  is  not  re¬ 
locatable. 

The  program  will  type  instructions  to  the  operator  as  the 


test  proceeds.  Prior  to  execution,  the  necessary  DSO  link¬ 
age  must  be  established  for  those  groups  being  tested. 


Program  Segment 

Octal  Locs. 

Total 

Micro  Multiply 

70040-70051 

12 

Main  Program 

70100-70256 

157 

Micro  Type 

450-461 

12 

Decimal  Input 

650-777 

130 

333* 

Working  Storage: 

0  Group  address  and  output  word 
1  Group  address  and  complement  output  word 
3  Time 

5  Timing  counter 

6  Address  of  Micro  Type  routine 

None  used 
Not  applicable 
All  registers  used 
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SENSE  SWITCHES: 

1  Mode  1:  All  DSO  Groups 

2  Mode  2:  Single  DSO  Group 

3  New  time 

4  Channel  malfunction 

5  New  group  number  and  output  word 

6  New  mode-selection 

PROGRAM  FLAGS: 

None  used 

I/O  DEVICES: 

Typewriter 

ADIOCE 

Oscilloscope 

PROGRAM  HALTS: 

None 
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DISCRETE  OUTPUT  DYNAMIC  TEST 


c  START  ) 

n 

r 

Turn  Off 
SW,  CT, 
IM 

All 

and 

n 

[7 

37 


2 


0 


38 


39 


22 


40 


41 


42 


43 


LDR  ,  Die  ON«**F#r  RESPONSE 

LOR  «  18  FEBRUARY  1965 


LOR 

* 

L0C  e 

70100 

70100* 

027  0.2673 

CTS  7 

0  • 

TURN  BFF  ALL  TOGGLES 

LB  I  P 

c 

70101* 

00000450 

0000 

# 

AbORESS  6 F 

0450 

# 

micrb  type  routine 

70102* 

21634573 

STW  6 

c 

gxc  p 

-C 

70103* 

02401000 

0240 

CONTROL  WSRl 

1000 

# 

FORMAT  1 

70104* 

35301477 

TCF  SW  X 

BT  R 

0  p 

SU  .OFF, . ...  _ 

70105* 

23634573 

LOW  6 

c 

EXC  P 

c 

70106* 

04201024 

0420 

0 

control  WORD 

1Q2A 

FORMAT  2 

70107* 

37311671 

TCT  Sb 

1  1  0 

SWl  BN? 

ftr 

57  , 

YES  -  T 8  MBDE  1 

70110* 

35321476 

TCF  Sk 

1  2  , 

SH2  BN? 

— 

BTR 

1  « 

NB  .  LOOP 

701 1 1  * 

23634573 

LOW  6 

c  • 

MODE  2  TEST 

EXC  P 

c 

70112* 

15201066 

1520 

B 

CONTROL  WORD 

.  -  _ 

1066 

FORMAT  3 

70113* 

70751601 

CPF  P 

L 

FTR 

1 

JUMP  TB  OCTAL  TYPE-IN 

701  14* 

2101 1613 

STW  0 

A  B 

GBP.  ADDRESS  T0  WSO 

FTR 

11  • 

unconditional  transfer 

70115* 

26731233 

LDI  P 

C  , 

BCTAL  TYPE-IN 

sel  c 

C  » 

select  typewriter 

70116* 

02006100 

0200 

0 

for  input 

6100 

'  -  - 

70117* 

65635711 

CBM  6 

c  0 

LOCK  COM  TB  03 

XBR  A 

A  f 

CLEAR  A 

70120* 

07617043 

CLD  0 

61 

CPF  D 

C  » 

C  -  61  (SLASH) 

70121* 

07120503 

CLD  e 

12  . 

D  .  12  (BACKSPACE) 

LRC 

3  • 

N  ■  3 

44 


70122* 

10120000 

DTR 

N6P 

1 

B 

70123* 

5724324 1 

X&R 

D 

T  Z0 

0 

F 

•  BACKSPACE? 

70124* 

70576501 

CPF 

L 

P 

•  YgS  -  RETuRfl  T0 

_ *  A * _ UNLiCK  CBM 

70125* 

6 A3  15723 

 SSL 

-LflC 

A  *  SHIFT  A  LEFT  3 

X0R  0  C 


70126*  32311470  TZ0  C  F  *  SLASH? 

BTR  7  Yg$  -  BEGIN  0VER 

70127*  64211470 _ LBR..B.  A _ . _ RACK  W0RD _ 

BTR  7 


70130*  23634573  LOW  6  C 

_  EXC  P  C 


70131*  0 1 60 12AQ  0160  C0NTRSL  WORD 

1240  •  FORMAT  4 

70132*  70751462  CPF  P  L 

BTR  13 


70133* 

23Q2A4  I  2 

i  nu  n  r 

L0R  A 

B 

# 

0UTPUT  W0RD  T0  B 

70134* 

63110000 

CCL  A 
N0P 

A 

70135*  23035613 

LDH  0 

C 

AND  A 

c 

70136* 

21022113 

STW  0 

8 

STW  1 

C 

9 

save  sutput  W0RDS 

70137* 

23634573 

lDh  $ 

c 

EXC  P 

c 

70140* 

01101256 

0110 

9 

C0NTR0L  WORD 

1256 

9 

F0RMAT  5 

70141* 

Q5022675 

LRC 

2 

9 

SCALE  •  2 

LDI  P 

L 

70142* 

00000650 

0000 

9 

ADDRESS  0F 

0650 

9 

DECIMAL  TYPE-IN 

70143* 

45750000 

EXC  P 
N0P 

L 

70144* 

21322673 

STW  3 

8 

LDI  P 

C 

70145* 

30324000 

3032 

4000 

70146* 

46750440 

CPL  P 

L 

CLP  © 

40 

9 

JUMP  T©  MPY  R0UTINE 

45 


*  26745514 _ UU-P-D. 

ADL  A  D 


70150* 

77777660 

7777 

J7660 

7n.*l*  1  T7fi  n  « 

FTR  1 

70152* 

07041601 

CLD  4 

FTR  1 

711153*  05046674 

IRC  4 

SSL  R9L  D 

70154* 

21540000 

STW  5  D 

_ N6P 

- - 

_ 7.0155* 

00000000 

_ N8P 

N0P 

70156* 

00000000 

N0P 

- - _ 

N0P 

_  70157* 

00000000 

N0P 

NOP 

70160* 

26731233 

LDI  P  C 

— 

SEL  C  C 

* 

SELECT  ADI6CE 

70161* 

32003000 

3200 

0 

SELECT  W0RD 

3000 

0 

R AND0M t  CH.  01 

70162* 

656IOOOO 

C0M  6  A 

9 

L0CK  CBM  T0  01 

N8P 

70163* 

23522352 

LOW  5  8 

3 

W85  T0  B 

LOW  5  8 

3 

KILL  TIME 

70164* 

54223027 

CDL  B  8 

3 

8  ■  1 

tnz  b  sxr 

3 

B  »  07 

70165* 

14760000 

BTR  1 

3 

N0  -  L96P 

N8P 

701 66* 

23111021 

LDW  1  A 

DTR  2  A 

9 

DTR  0UT  WS1 

70167* 

23042101 

LDW  0  D 

STW  0  A 

70170* 

21143733 

STW  1  D 

9 

exchange  wso  and  WS1 

TCT  SW  3 

9 

SW3  -  07 

70171* 

14450000 

BTR  26 

9 

N0  -  GET  NEW  T 

N0P 

70172* 

37341607 

TCT  SW  4 

9 

SW4  -  07 

FTR  7 

0 

N0  -  CHANNEL  MALFUNC T I 0N 

70173* 

37351602 

TCT  SW  5 

9 

SW5  ■  07 
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70174 

70175 

70176 

70177 

70200 

70201 

70202 

70203 

70204 

70205 

70206 

70207 

70210 

7021  1 

70212 

70213 

702H 

70215 

70216 

7021  7 


37361410 

14650000 

23634573 

01501223 

14120000 

16060000 

23634573 

00601267 

37331464 

37351470 

35361475 

14651410 

23634573 

07701275 

23634573 

01101256 

05020000 

26754575 

00000650 

21322673 


FTR 

2 

9 

NS  -  RESELEftT  CRP.  AND 

TCT  SW 

1  6 

9 

Stf6  •  07 

BTR 

55 

JL.  . 

_N0  -  RESELEtT  MADE 

BTR 

10 

9 

YfcS  -  SAME  TEST 

N0P 

LOW  6 

C 

£XC  P 

c 

0150 

9 

C0NTR0L  W8RB 

1223 

9 

F0RMAT  3A . 

BTR 

53 

9 

GET  NEW  GRP.  ADD. 

N8P 

FTR 

6 

9 

INTERMEDIATE  JUMP 

N0P 

9 

T 0  M0DE  1 

l_DW  6 

C 

9 

ERR0R  R0UT 1  (3E 

EXC  P 

C 

0060 

9 

C0NTR0L  W0RD 

1267 

9 

FORMAT  6 

TCT  SH 

1  3 

9 

NEW  T 

BTR 

1 1 

TCT  Sw 

1  5 

9 

NEW  GRP.  AND  D6.  N0. 

BTR 

7 

TCF  SW 

1  6 

BTR 

2 

BTR 

10 

BTR 

55 

LDW  6 

C 

9 

M0DE  1  TEST 

EXC  P 

C 

0770 

9 

C0NTR0L  W8RD 

1275 

9 

F0RMAT  7 

LDW  6 

C 

EXC  P 

C 

0110 

9 

C0NTR0L  WORD 

1256 

9 

FORMAT  5 

lrc 

2 

9 

SCALE  *  2 

N6P 

LD I  P 

L 

EXC  P 

L 

0000 

9 

ADDRESS  0F 

0650 

9 

decimal  TYPE-IN 

STW  3 

B 

9 

T  T0  WS3 
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LDI  p  c 


70220*  30324000 

3032 

4000 

70221*  46750440 

fPI  2  L 

CLP  6  40  , 

Til  mPY  R0UT1NE 

70222*  26745514 

LDI  P  D 

ADL  a  0 

70223*  77777340 

77  77 

7340 

70224*  32441601 

TZ0  D  s 

FTR  1 

70225*  07041601 

CLD  4 

FTR  1 

70226*  05046674 

LRC  4 
ssi  sat  o 

7Q227 *  21540000 

STM  5  D 

N0P 

70230*  00000000 

N0P 

N0P 

70231*  OOQOOOQO 

N8P _ 

N0P 

70232*  OOO0OOOO 

N0P 

N6P 

70233*  46030000 

CPL  •  C  t 

C  ■  0 

N0P 

70234*  26740000 

LDI  P  D 
..  NfiP 

70235*  32002060 

3200  # 

SELECT  W0RD 
SE0UENTIAL  -  60 

2060  « 

70236*  05036632 

LRC  3 

S&L  .L0L  B  # 

M1CRSSBC0NDS 

70237*  12440000 

SEL  D  D  * 

SELECT  AOI0CE 

N6P 

70240*  23526561 

LDW  5  B  , 
r  8M  $  A  a 

MS5  T0  B 

L0CK - C6M  T6  01 

70241*  54223027 

CDL  8  B  * 

TNZ  8  SXF  » 

B  *  B-l 

8^0? 

70242*  14760000 

BTR  1 

N0P 

70243*  63334604 

CCL  C  C  j 
CPL  8  D  * 

C  >  C0MP •  (C) 

D  .  0 
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70244* 

10635244 

DTR 

6  C 

0 

CIX 

D  D 

71124  5* 

31771476 

TMF 

7  7 

BTR 

1 

70246* 

37331443 

TCT 

SW 

3 

0 

BTR 

28 

0 

-7-02.47.*. 

37341602 

_ ICT 

SW 

4 

0 

FTR 

2 

0 

70250* 

35361463 

TCF 

SW 

6 

0 

BTR 

12 

0 

70251* 

14350000 

BTR 

34 

0 

N0P 

70252* 

23634573 

LOW 

6  C 

0 

EXC 

P  C 

70253* 

00601267 

0060 

0 

1267 

0 

70254  * 

37331435 

TCT 

SW 

3 

0 

BTR 

34 

70255* 

35361476 

TCF 

SW 

6 

0 

BTR 

1 

70256* 

14300000 

BTR 

39 

N0P 

LDR 

ldr 

*  00070100  END  6  70100 


dtr  euT  c 

SM  3  ■  17 

YES  -  SET  NEW  T 

SW4  >  1? 

YES  -  CHANNEL  MALFUNCTION 

SW  6  ■  1? 

N0  -  SAME  TEST 

YES  -  RESELECT  M6DE 

ERR0R  ROUTINE 

C0NTR0L  W0RD 
FORMAT  6 

NEW  T 

NEW  m@DE 


END  DS6  0N-0FF  RESPONSE  TEST 
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DISCRETE  OUTPUT  ON-OFF  RESPONSE  TEST 


TURN  OFF  ALL  SENSE  SWITCHES. 


SELECT  MODE: 

SW1  MODE  1  -  ALL  DISCRETE  OUTPUTS 

SW2  MODE  2  -  SINGLE  DISCRETE  OUTPUT 


MODE  2  SELECTED. 

TYPE  IN  GROUP  ADDRESS  AND  DISCRETE  OUTPUT  NUMBER  IN  OCTAL. 
THEN  TYPE  T  IN  SECONDS  AND  OBSERVE  OUTPUT . 

SENSE  SWITCH  OPTIONS  ARE  AS  FOLLOWS: 

SW3  NEW  T 

SW4  CHANNEL  MALFUNCTION 

SW5  NEW  GROUP  AND  D/O  NUMBER _ 

SW6  NEW  MODE  SELECTION 


GROUP  ADDRESS  =  j>0 

DISCRETE  OUTPUT  NUMBER  =  77770000 


T  = 
T  = 

SELECT  MODE: 


1.0 

.1  CHANNEL  MALFUNCTION 


SW1  MODE  1  -  ALL  DISCRETE  OUTPUTS 

SW2  MODE  2  -  SINGLE  DISCRETE  OUTPUT 


MODE  1  SELECTED. 

TYPE  IN  T  IN  SECONDS  AND  OBSERVE  OUTPUT. 
SENSE  SWITCH  OPTIONS  ARE  AS  FOLLOWS: 

SW3  NEW  T 

SW4  CHANNEL  MALFUNCTION 

SW6  NEW  MODE  SELECTION 


T  =  .0001 

T  =  1.0 

T  =  .5 
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PB-440  PROGRAM  ABSTRACT 


PROGRAM  TITLE: 

PROGRAMMER: 

DATE: 

ID: 

FUNCTION: 

TECHNIQUE: 


LOADING  PROCEDURES: 

OPERATING  PROCEDURES  & 
LINKAGE  REQUIRED: 


PROGRAM  STORAGE: 


ANALOG  OUTPUT  ACCURACY  TEST 
P.  A.  KNOOP 

7  April  1965 
None 

The  purpose  of  this  program,  part  of  the  ADIOCE  Ac¬ 
ceptance  Test  package,  is  to  test  the  accuracy  of  the 

8  high-accuracy  and  56  low-accuracy  digital-to-analog 
channels  in  the  PB-440  ADIOCE  system. 

After  the  user  types  in  the  number  of  the  channel  selected 
for  testing,  the  program  types  the  first  correct  output 
number  and  its  true  reference  voltage.  Then,  when  in¬ 
structed,  the  program  outputs  the  digital  number  over 
the  selected  AO  channel.  Using  sense  switches  and  a  null 
volt  meter,  the  user  examines  the  output  and  may  instruct 
the  program  to  slew  the  output  number  up  or  down  until 
an  accurate  response  is  observed.  He  then  instructs  the 
program  to  print  the  digital  number  actually  required  to 
obtain  the  true  reference  voltage.  The  test  continues  for 
output  voltages  ranging  from  plus  10  to  minus  10  by 
decrements  of  approximately  one  volt. 

Load  with  Binary  leader  I.  This  program  is  not  re¬ 
locatable. 

Hardware  linkage  between  the  null  volt  meter  and  the 

AO  channel  being  tested  must  be  established  prior  to 
execution.  The  program  types  out  instructions  for  oper¬ 
ation  which  are  self  explanatory.  The  channel  number 
should  be  typed  in  octal  and  terminated  with  a  back¬ 
space.  If  an  error  is  made  while  typing,  striking  a  slash 
(/)  will  permit  the  user  to  rebegin. 


Program  Segment 

Octal  Locs. 

Total 

Main  Program 

70100-70224 

125 

Output  words  & 

ref.  voltages 

200-251 

52 

Micro  Type 

450-461 

12 

Decimal  Out 

500-621 

122 

Comments 

1000-1233 

234 

567s 
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INTERMEDIATE  STORAGE: 


SPECIAL  STORAGE: 
EXECUTION  TIME: 
REGISTERS: 

SENSE  SWITCHES: 


PROGRAM  FLAGS: 
I/O  DEVICES: 

PROGRAM  HALTS: 


Working  Storage: 

0  Storage  of  channel  number 

1  Storage  of  address-counter  for  fetching  current  out¬ 
put  word  and  voltage 

4  Storage  of  word  and  channel  to  be  output  to 
ADIOCE 

200-251  Output  words  and  ref.  voltages 
Not  applicable 
All  Used 

1  Set  when  meter  has  been  set  to  typed  voltage;  zeroed 
when  ready  for  next  test-point 

2  Slew-up 

3  Slew-down 

4  Set  to  type  required  number;  zeroed  when  ready 
for  next  point 

5  For  AO  channel  number  request 

6  on  when  typing  correct  number;  off  when  typing 

true  reference  voltage;  used  as  program  toggle  only 

Typewriter 

ADIOCE 

Null  Volt  Meter 

None 
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ANALOG  OUTPUT  ACCURACY  TEST 


Turn  Off  All 
PF,  IM,  CT 


x 

Type  Title 
and  SW 
Options 


Type 

Request 
for  Cb* 

No. 

Hr 


53 


54 


55 


4 


56 


57 
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LDR 

LDR 

* 

L0C  0  70 

70100* 

02700000 

CTS  7  Q 
N0P 

70101*  26734573 _ 

_ lui-  P  c 

Exc  p  C 

70102* 

00000450 

0000 

0450 

.  _7tUQ3«L_ 

16HQ1000 

—1-600 

1000 

70104* 

35351477 

TCF  SW  5 
BTR  0 

—7-01  05*_ 

.26734573 

LDI  P  C 
EXC  P  C 

70106* 

00000450 

0000 

0450 

70107* 

01001160 

0100 

1160 

70110* 

26731233 

LDI  P  C 
SEL  C  C 

70111* 

02006100 

0200 

6100 

70112* 

65635711 

CBM  6  C 
X0R  A  A 

70113* 

07617043 

CLD  0  61 
CPF  D  C 

70114* 

07120503 

CLD  0  12 
LRC  3 

70115* 

10120000 

DTR  1  B 
N0P 

70116* 

57243241 

X0R  B  D 

TZ0  D  F 

701 17* 

16032141 

FTR  3 

STW  4  A 

70120* 

66315723 

SSI _ L0L 

X0R  B  C 

70121* 

32311470 

TZ0  C  F 
BTR  7 

70122* 

64211470 

L0R  B  A 

ANAL0G  0UTPOT  ACCURACY-  TEST 
7  APRIL  1968 

TURN  0FF  ALL  PR0GRAM  FLaCS. 

interrupt  masks,  and  tbgglfs 

TYPE  TITLE  9F  TEST  AND 
SENSE  SWITCH  0PTI0NS 

ADDRESS  0F  MICR0  TYPE-SuT 

C0NTR0L  W0RD  F0R  TYPE-eflT 
format  i 

L00P  UNTIL  SW  5  IS  0N 

TYPE  REQUEST  F0R 

Channel  number 

ADDRESS  0F  M  ICR©  TYpE-©fiT 

C0NTR0L  W0RD 
FORMAT  2 

0CTAL  TYPE-IN  R0UTINE 

SELECT  W0RD 
TYPEWRITER  INPUT 

CHANNEL  3 
CLEAR  A 

c  set  ts  6i  -  slash 

D  ■  12  (BACKSPACE) 

N  ■  3 

DTR  in  character 

WAS  CHAR,  A  BACKSPACE? 

YES  -  FINISHED 
SAVE  CH.  N0.  IN  HS  4 

N0  -  PACK  CHAR,  INT0  W0rD 

WAS  CHAR,  A  SLASH? 

YES  -  BEGIN  0VER 

N9 
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BTR  7 


70123* 

26734573 

LD I  PC 

.  i xc.  P  £ 

0 

type  column  headings 

70124* 

00000450 

0000 

0450 

0 

ADDRESS  9F  MICRO  TYPE0UT 

70125* 

02301170 

0230 

117U  . 

0 

& 

C0NTR0L  H0RB 

F0RMAT  3 

70126* 

21000000 

STM  0  Q 

m 

HSO  -  0 

N0P 

70127* 

34060515 

STF  PE_  6 

Pt  6  «  0 

LRC  13 

0 

N  *  1 3  F0R  SCALE 

70130* 

23042222 

LDH  0  D 
LDS  2  B 

0 

0 

MS  0  T0  D 

M0RD  T0  BE  TYPED  T0  • 

70131* 

44442104 

CIL  D  D 

STM  0  D 

0 

MS  0  ■  MS  0  ♦  l 

70132* 

26754575 

LD  I  P  L 
EXC  P  L 

0 

TYPE  TRUE  NUMBER 

70133* 

00600500 

0060 

0500 

0 

0 

ADDRESS  0F  DECIMAL 
TYPE0UT  ROUTINE 

70134* 

26734573 

LDI  PC 
EXC  P  C 

0 

TYPE  EIGHT  SPACES 

70135* 

00000450 

0000 

0450 

0 

0 

ADDRESS  0F  MICRO  TYPEOUT 
TYPE  «  SPACES 

70136* 

00201161 

0020 

1161 

0 

0 

CONTROL  MORD 
format  s 

70137* 

37061606 

TCT  PF  6 
FTR  6 

a 

0 

PF  6  •  1? 
yes 

70140* 

36060504 

STT  PF  6 
LRC  4 

0 

0 

NO  -  SET  PF6  TRUE 

SET  SCALE  TO  4 

70141* 

23042222 

_LDH  0  D 

a 

MS  0  TO  D 

LDS  2  B 

a 

MORD  TO  BE  TYPED  TO  B 

70142* 

44442104 

CIL  D  D 
STM  0  D 

0 

MS  0  •  MS  0  ♦  1 

70143* 

26754575 

LDI  P  L 
EXC  P  L 

TYPE  VOLTAGE 

70144* 

00100500 

0010 

0500 

0 

0 

ADDRESS  OF  DECIMAL 
TYPE-OUT  ROUTINE 

70145* 

14660000 

BTR  9 

N8P 

70146* 

35311477 

TCF  SM  1 
BTR  0 

0 
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LOOP  UNTIL  SM  1  •  1 

70147*  23045444 

LDM  0  D 
COL  D  D 

3 

FETCH  ms  o  to  d 

70150*  54442222 

cdl  d  d 

LDS  2  B 

3 

3 

D  .  D  -  2 

get  current  butput 

70151*  23436423 

LOW  4  C 
LOR  B  C 

3 

3 

CH.  N0.  to  c 

FORM  OUTPUT  MORD 

70152*  26711211 

LDI  P  A 
SEL  A  A 

m 

SELECT  ADieCE 

70153*  32001000 

3200 

1000 

3 

3 

SELECT  MORD  -  ADIOCE 
random  .  ch.  oo 

70154*  65601023 

COM  6  Q 
DTR  2  C 

3 

3 

lock  com  to  00 

DTR  TO  ADieCE 

70155*  21120000 

STM  1  B 
N8P 

3 

OUTPUT  MORD  TO  MS  1 

70156*  37321623 

TCT  SM  2 
FTR  19 

3 

3 

SM  2  ■  1? 
yes  -  slem  UP 

70157*  37331624 

TCT  SM  3 
FTR  20 

3 

3 

SM  3  »  1? 

YES  -  SLEM  DOMN 

70160*  35341475 

TCF  SM  4 
BTR  2 

3 

3 

SM  4  -  0? 

YES  -  LOOP 

70161*  23120515 

LDM  1  B 
LRC  13 

3 

3 

NB  -  TYPE  REQUIRED  VALUF 
SCALE  ■  13 

70162*  26754575 

LDI  P  L 
EXC  P  L 

70163*  00600500 

0060 

0500 

3 

3 

ADDRESS  OF 

DECIMAL  TYPEOUT 

70164*  23012673 

LDM  0  A 
LDI  P  C 

3 

MS  0  TO  A 

70165*  77777726 

7777 

7726 

3 

-42.0  (023) 

70166*  55133034 

ADL  A  C 
TN2  C  S 

3 

3 

mas  this  THE  LAST 

VALUE  FeR  THIS  TEST? 

70167*  16040000 

FTR  4 

N0P 

3 

NO 

70170*  26734573 

LDI  P  C 
EXC  P  C 

3 

YES 

70171*  00000450 

0000 

0450 

3 

ADDRESS  OF  MICRO  TYPE-OnT 

70172*  02101213 

0210 

1213 

3 

3 

CONTROL  MORD 
format  4 

70173*  14100000 

BTR  55 

3 

TEST  ON  SM  5 
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N0P 


70174*  26734573 

LDI  P  C  # 
EXC  P  C  , 

TYPE  C/R  AND 

spaces 

70175*  00000450 

0000  « 
0450 

ADDRESS  0F  M ICRS  TYPE 

70176*  00101160 

0010  , 
1160 

C9NTR0L  W0RD 
-FORMAT  cs 

7C177*  37311477 

TCT  Sw  1  . 

BTR  0  . 

L00P  UNTIL 

SW  1  AND  SW  4 

70200*  37341477 

TCT  SW  4  . 

BTR  0 

ARE  B0TH  0FP 

70201*  14250000 

BTR  42  . 

N0P  « 

JUMP  T0  GET  NEXT 

VALUE 

70202*  27711603 

LDM  P  A  . 

FTR  3 

SLEW-UP  ROUTINE 

70203*  00002000 

0000 

2000 

*  1  SCALED  B  13 

70204*  26710000 

LDI  P  A  * 

N0P 

SLEW-D0WN  ROUTINE 

70205*  77776000 

7777 

6000 

-1  SCALED  B  13 

70206*  23432672 

LOW  4  C  « 

LDI  P  B 

CH.  N0.  T 0  C 

70207*  77777510 

7777  , 

7510 

-270 

FIRST  HIGH  ACC.  CH. 

70210*  55323024 

ADL  C  B 

TNZ  B  S  « 

LOW  ACCURACY? 

70211*  05046631 

LRC  4  * 

SSL  L0L  A  • 

YES 

SHIFT  A  LEFT  4 

70212*  23125512 

LDW  1  B  • 
ADL  A  B  « 

GET  CURRENT  WORD 

modify  it 

70213*  21126423 

STW  1  B 

L0R  B  C  « 

RESTORE  WS  1 

form  output  word 

70214*  26711211 

LDI  P  A 

S5L  A  A  « 

SELECT  ADIOCE 

70215*  32001000 

3200 

1000  « 

SELECT  WORD  -  ADIOCE 
RANDOM  -  cH.  00 

70216*  65601023 

COM  6  Q  . 

DTR  2  C 

LOCK  COM  TO  000 

70217*  26710000 

LDI  P  A 

N0P 
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70220* 

01415177 

0141 

5177 

# 

399.999  (123) 

7 0221* 

54113214 

cdl  a 

TZ0  A 

A  « 

s 

DELAY  2  SEC0NOS 

70222* 

14760000 

BTR 

N0P 

1 

70223* 

14320000 

BTR 

N0P 

37 

* 

00070100 

END  0 

70100 
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ANALOG  OUTPUT  ACCURACY  TEST 


SW5=1  FOR  A/O  CH.  NO.  REQUEST 

SW1=1  WHEN  METER  HAS  BEEN  SET  TO  TYPED  VALUE 

SW2=1  TO  SLEW  OUTPUT  NUMBER  UP 

SW3=1  TO  SLEW  OUTPUT  NUMBER  DOWN 

SW4=1  TO  TYPE  OUT  SLEWED  VALUE 

SW1=0  AND  SW4=0  TO  TYPE  OUT  NEXT  TEST  POINT 

CONNECT  NULL  METER  TO  DESIRED  A/O  CH.  BEFORE  HITTING  SW5 . . . 
THEN  TYPE  CH.  NO.  IN  OCTAL. 


CH.  NO.  =  270. 

TRUE  NO. 

VOLTAGE 

REQUIRED 

8191. 

10.00000 

8191. 

7372. 

9.00012 

7372. 

6553. 

8.00024 

6553. 

5734. 

7.00037 

5734. 

4915. 

6.00049 

4915. 

40  96. 

5.00061 

4096. 

3277. 

4.00073 

3277. 

2458. 

3.00085 

2458. 

1639. 

2.00098 

1639. 

820  . 

1.00110 

820. 

0. 

0.00000 

0. 

820  . 

1.00097 

820. 

1639. 

2.00073 

1639. 

2458  . 

3.00048 

2458. 

3277. 

4.00024 

3277. 

4096. 

5.00000 

4096. 

4916. 

6.00097 

4916. 

5735. 

7.00073 

5735. 

6554. 

8.00048 

6554. 

7372  . 

9.00024 

7372. 

8191. 

9.99877 

8191. 

END  OF  THIS  TEST  -  HIT  SW5  TO  RESTART  WITH  NEW  A/O  CHANNEL 
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PB-440  PROGRAM  ABSTRACT 


PROGRAM  TITLE: 

ANALOG  OUTPUT  DYNAMIC  TEST 

PROGRAMMER: 

P.  A.  KNOOP 

DATE: 

10  March  1965 

ID: 

None 

FUNCTION: 

The  purpose  of  this  program  is  to  test  the  analog  output 
response  time  for  the  PB-440  ADIOCE  system.  This  is 
one  of  the  ADIOCE  Acceptance  Test  programs. 

TECHNIQUE: 

Given  the  time  base  (per  period),  magnitude,  and  AO 
channel  number,  this  program  issues  a  square  wave  re¬ 
sponse  over  the  AO  channel.  The  time  base  and  magni¬ 
tude  may  be  supplied  via  the  on-line  typewriter  or  via 
analog  input  channels  100  and  101.  If  the  latter  mode  is 
chosen,  the  routine  prints  the  current  time-base  and 
magnitude  upon  instruction  from  the  operator.  Facility 
is  included  for  recording  occurrences  of  output  distortion. 

LOADING  PROCEDURE: 

load  with  Binary  loader  I.  This  program  is  not  re¬ 
locatable. 

OPERATING  PROCEDURES  & 

Hardware  linkage  must  be  established  prior  to  execution. 

LINKAGE  REQUIRED: 

The  program  will  type  instructions  to  the  operator  with 
self-explanatory  notes  in  a  conversational  manner.  Lower 
and  upper  limits  on  the  time  base  are  100  microseconds 
and  one  second,  respectively.  Attached  to  this  abstract  is 
a  table  of  time  and  magnitudes  which  would  likely  be 
desired  as  inputs  for  the  program.  Limits  on  the  magni¬ 
tude  are  plus  and  minus  ten  volts  (full  maximum  output 
word). 

Except  for  the  AO  channel  number,  all  type-ins  are  as¬ 
sumed  to  be  decimal.  If  analog  inputs  100  and  101  are 
used  for  supplying  inputs  to  the  program,  no  scaling  is 
performed  but  the  limitations  cited  above  still  apply  and 
are  program-initiated.  If  the  inputs  are  supplied  via  the 
typewriter,  time  should  be  in  seconds  and  magnitude 
should  be  a  positive  or  negative  integer. 
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PROGRAM  STORAGE: 


INTERMEDIATE  STORAGE: 


SPECIAL  STORAGE: 
EXECUTION  TIME: 
REGISTERS: 

SENSE  SWITCHES: 


PROGRAM  FLAGS: 
I/O  DEVICES: 

PROGRAM  HALTS: 


Program  Segment 

Octal  Locs. 

Total 

Main  Program 

70100-70275 

176 

Micro  Multiply 

70040-70051 

12 

Comments 

1000-1401 

402 

Micro  Type 

450-461 

12 

Decimal  Output 

500-621 

122 

Decimal  Input 

650-777 

130 

1076s 

Working  Storage: 

0  Storage  of  magnitude 

1  Storage  of  channel  number 

2  Storage  of  time  base 

3  Storage  of  positive  output  word 

4  Address  of  micro  type  routine 

5  Timing  counter 

6  Storage  of  negative  output  word 

None  used 
Not  applicable 
All  used 

1  Mode  1 

2  Mode  2 

3  Enter  new  T,  M  (Mode  1) 

Type  out  T,  M  (Mode  2) 

4  Output  distorted 

5  Read  new  T,  M  (Mode  2) 

6  New  Channel  number  request 

2  On  for  Mode  2  test 

Off  for  Mode  1  test 

Typewriter 

ADIOCE 

Scope 

None 
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ANALOG  OUTPUT  DYNAMIC  TEST 

TIME-MAGNITUDE  TABLE 


Time  (sec.) 

Frequency 

Period 

Magnitude 

Voltage ** 

.0001 

10  KC 

.1  MS 

0 

0 

.0010 

1  KC 

1.0  MS 

102 

1 

.0100 

.1  KC 

10.0  MS 

205 

2 

.1000 

.01  KC 

100.0  MS 

307 

3 

1.0000 

1CPS 

1  SEC. 

409 

4 

512 

5 

614 

6 

716 

7 

818 

8 

921 

9 

1023 

10 

**  Approximate 


67 


ANALOG  OUTPUT  DYNAMIC  TEST 


START 
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T  =  10-*  + 
.48848(1 0-*)T 


2 


70 


71 


4 


Type 
T,  M 

in  Decimal 


Relock 
Com  as 
Before 


72 


73 


74 


75 


LDR  . 

A/0  CM*  RESPONSE  TEST 

LDR 

17  FEBRUARY  1965 

• 

70100*  02702673 

ldr 

L©C  e  70100 

CTS  70  . 

LD1  P  C 

TURN  8FF  ALL  TOGGLES 

70101*  00000450 

0000  . 
0450 

ADDRESS  OF  MICRO-TYPE 

70102*  21434573 

STW  4  C  • 

ADDRESS  TO  WS4 

EXC  P  C  • 

JUMP  TO  TYPE  ROUTINE 

70103*  02501000 

0250  • 

title  of  test 

1000  . 

format  1 

70104*  35301477 

TCP  SM  X  . 

LOOP  UNTIL  ALL 

...  btr  -  0  « 

SENSE  SWITCHES  OFF 

70105*  23434573 

LOW  4  C 

EXC  PC  . 

jump  to  type  routine 

70106*  04401025 

0440  • 

sense  switch  options 

-  - - - - 

-1025 

FORMAT  2 

70107*  37311604 

TCT  SW  1  . 

if  sw  i  on. 

FTR  4  • 

jump  TO  MODE  1 

70110*  35321476 

TCF  SH  2  . 

IF  SW2  ON. 

— 

BTR  1  * 

LOOP 

70111*  23434573 

LOW  4  C  » 

MODE  2  TEST 

EXC  PC  » 

JUMP  TO  TYPE  ROUTINE 

70112*  13301204 

1330  • 

MODE  2  INSTRUCTIONS 

- -  ■  -  - 

1204  . 

FORMAT  4.2 

70113*  36021602 

STT  PF  2  . 

FTR  2 

PF  2  -  1 

70114*  23434573 

LOW  4  C  . 

MODE  1  TEST 

— , - - .... 

EXC  PC  • 

JUMP  TO  TYPE  ROUTINE 

70115*  11301071 

1130  • 

MODE  1  INSTRUCTIONS 

1071 

FORMAT  4.1 

70116*  23434573 

LOW  4  C 

- - - 

EX£_P  C  » 

jump  to  type  routine 

70117*  01201337 

0120  • 

CH.  NO.  REOUEST 

1337  , 

FORMAT  5 

70120*  26731233 

LDI  P  C  * 

octal  type-in  routine 

SEL  C  C 

SELECT  TYPEWRITER 

70121*  02006100 

0200 

6100 
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70122* 

65635711 

CeM  6 

C  , 

LOCK  COM  T0  03 

X0R  A 

A  » 

A  ■  0 

70123* 

07617043 

CLD  6  61 

CPF  D 

c  , 

C  ■  61 

70124* 

07120503 

CLD  6 

12  • 

D  .  12 

LRC 

3  . 

N  -  03 

7012.5*  10120000 

DIR  1 

B  # 

_ DTR.  | NTS  I 

N0P 

70126* 

57243241 

X0R  B 

D 

TZ0  D 

F  , 

backspace? 

70127* 

16032111 

_ FTR _ 

_ 3 _ a.  . 

yes  -  finished 

STW  1 

A  B 

ANS  T0  WSl 

70130* 

66315723 

SSL  L6L  A  • 

SHIFT  A  LEFT  3 

X0R  B 

C 

70131* 

32311470 

Tze  c 

£_  « 

SLASH? 

BTR 

7 

YES  -  8EGIN  0VER 

70132* 

64211470 

L0R  B 

A  B 

N0  -  PACK  WORD 

BTR 

7  B 

DTR  NEXT  CHARACTER 

70133* 

35021670 

TCF  PF  2  . 

Pf 2  >  0? 

FTR 

56  . 

YES  -  T 8  M0DE  1 

70134* 

26731233 

LDI  P 

C  B 

MODE  2 

SEL  C 

C  B 

SELECT  ADI0CE 

70135* 

32003000 

3200 

B 

RANDOM 

3000 

B 

CHANNEL  01 

70136* 

65610740 

C0M  6 

A  B 

LOCK  C0M  T0  01 

CLD  0 

40 

70137* 

55441034 

ADL  D 

D  , 

D  ■  100 

DTR  3 

D 

DTR  IN  T  0N  CH.  100 

70140* 

46432672 

CPL  D 

c  , 

T  T0  C 

LDI  P 

B  . 

PICK  UP  CONSTANT 

70141* 

10001525 

1000 

B 

00040640  (■  -  9) 

1525 

70142* 

70750440 

CPF  P 

L 

CLP  0 

40  * 

JUMP  T0  MPY  ROUTINE 

70143* 

26725512 

LDI  P 

B 

ADL  A 

B 

GET  T  IN  SECONDS 

70144* 

00000321 

0000 

B 

.0001  (B2) 

0321 

70145* 

21222673 

STW  2 

B  B 

T  TO  WS  2 

LDI  P 

C 

70146* 

04704000 

0470 

B 

10000  ( B 1 6  ) 

4000 

77 


70147* 

70750440 

CPF 

P 

L 

CLP 

O 

4  0  # 

JUMP  T§  MPY  ROUTINE 

70150* 

07376342 

CLD 

0 

37 

CCL 

B 

B  «-1.0  (S18) 

70151* 

55123224 

ADL 

A. 

B _ 

TZ© 

B 

S  • 

IS  B  POSITIVE? 

70152* 

16022673 

FTR 

2 

YES 

LDI 

P 

C  * 

20  T0  C 

70153* 

07032154 

CLD 

0 

3  * 

D  «  3 

STW 

5 

D  • 

WS5  -  3 

70154* 

16040000 

FTR 

4 

N0P 

— . . 

70155* 

12000000 

1200 

9 

10.0  (65) 

0000 

70156* 

70750440 

CPF 

P 

L 

CLP 

0 

40  » 

JUMP  T0  MPY  R0UTINE 

70157* 

07035541 

CLD 

03  , 

D  ■  3  (B23) 

ADL 

D 

A 

70160* 

21510000 

STW 

5 

A  . 

10< 10000T-1  )  *3 

N0P 

70161* 

07405544 

CLD 

0 

40  • 

F0RM  CH.  NO.  101 

ADL 

D 

D 

70162* 

44441034 

CIL 

D 

D  « 

D  -  101 

DTR 

3 

D  « 

DtR  I  NTS  D 

70163* 

21042311 

STW 

0 

D 

M  T0  WSO 

LDW 

1 

A  9 

CH.  NO.  TO  A 

70164* 

64412131 

LOR 

D 

A 

STW 

3 

A  , 

*  WORD  AND  CH.  TO  WS3 

70165* 

63444444 

CCL 

D 

D 

CIL 

D 

D  , 

-M  TO  D 

70166* 

23126442 

LDW 

1 

8  9 

CH.  NO.  TO  8 

V 

L6R 

D 

B 

70167* 

21620000 

STW 

6 

B 

-WORD  AND  CH.  TO  WS6 

NOP 

70170* 

00000000 

N0P 

N6P 

70171* 

23522352 

LDW 

5 

B  # 

WS5  TO  B 

LDW 

5 

B 

DELAY 

70172* 

54223027 

CDL 

B 

B 

B  «  B-l 

TNZ 

B 

SXF  , 

B  .  0? 

70173* 

14760000 

BTR 

1  # 

N0  -  LOOP 

78 


NOP 


70174* 

23631023 

LOW  6  C 
PTR  2  P- 

-A  ..  .  

YES 

Dvr  but  m 

7n 1 75*  9111915.  inU  1 

STW  6  A 

70176* 

21333733 

STW  3  C 

9 

EXCHANGE  WS3  AND  WS6 

ICI  SU  3 

9  . 

SU  3 

70177  * 

ifillQQOQ 

FTR  9 

M  _ 

YFS  •  TYPr  V  AND  M 

N0P 

70200* 

00000000 

N0P 

NfiP 

70201* 

37341603 

ICT  SW  4 

SW4  ■  17 

FTR  3 

_ 

9 

YES  -  0UTPUT  DISTORTED 

70202* 

37351431 

TCT  SW  5 

9 

SW5  -  17 

BIR  3fl 

9 

YtS  •  NtW  T  AND  -M 

70203* 

37361412 

TCT  SW  6 

9 

SU  6  ■  17 

BTR  53 

9 

YES  -  NEW  CM.  N0. 

70204* 

14610000 

BTR  11 

NOP 

9 

N0  -  L00P 

70205* 

23434573 

LOW  4  C 

9 

output  distorted  routine 

— - - 

EXC  P  C 

9 

JUMP  TO  TYPE  ROUTINE 

_ 70206* 

00701351 

0070 

OUTPUT  DISTORTED 

1351 

9 

FORMAT  6 

70207* 

35361477 

TCF  SW  6 

9 

SW6  -  07 

BTR  0 

9 

YES  -  LOOP 

_ 7  0  2 1 0  * 

14050000 

BTR  58 

NO  -  CH.  NO.  REQUEST 

N0P 

7021  1  * 

23434573 

LOW  4  C 

9 

TYPE  T  AND  M  ROUTINE 

EXC  P  C 

9 

JUMP  TO  TYPE  ROUTINE 

70212* 

Ol  101360. 

0110 

9 

T  ■ 

1360 

9 

format  a 

70213* 

05022322 

LRC  2 

9 

N  .  2  (SCALE) 

LOW  2  B 

9 

T  TO  B 

70214* 

26754575 

LDI  P  L 

EXC  P  L 

9 

TYPE  T  IN  DECIMAL 

70215* 

00000500 

0000 

9 

0500 

70216* 

23434573 

LOW  4  C 

EXC  P  C 

9 

JUMP  TO  TYPE  ROUTINE 

70217* 

01101371 

0110 

9 

M  > 

1371 

9 

FORMAT  9 

79 


70221*  26754575 


LDH  0  B 
LRC  11 


* 


H  T0  B 

N  -  ll  (SCALE) 


3 


LDI  P  L 

EXC  PL  *  TVPE  M  IN  DECIMAL 

70222*  00600500  0060 


0500 

70223* 

65611455 

COM  6 

A 

* 

L9CK  COM  TO  01 

BTR  IS 

3 

70224* 

23434573 

LOW  4 

c 

3 

MODE  1  TEST 

£XC  P 

c 

3 

JUMP  TO  TYPE  ROUTINE 

_ 70225* 

01101360 

0110 

3 

T  * 

1360 

3 

fbRmat  8 

70226* 

05020000 

LRC 

2 

3 

N  «  2  (SCALE) 

NSP 

70227* 

26754575 

LDI  P 

L 

ExC  P 

L 

3 

JUMP  TO  TYPE-IN 

routine 

70230* 

00000650 

0000 

0650 

70231* 

21220000 

STW  2 
N6P 

B 

3 

T  TO  WS2 

70232* 

23434573 

LDW  4 

C 

_EXC  P 

C 

3 

JUMP  TO  TYPE  ROUTINE 

70233* 

01101371 

0110 

3 

M  « 

1371 

3 

FORMAT  9 

70234* 

05130000 

LRC 

NOP 

11 

3 

N  «  11  (SCALE) 

70235* 

26754575 

LDI  P 

L 

EXC  P 

L 

3 

JUMP  TO  TYPE-IN 

routine 

70236* 

00000650 

0000 

0650 

70237* 

21022311 

STW  0 

B 

3 

M  TO  WSO 

LOW  1 

A 

3 

CH.  NO.  TO  A 

70240* 

64212131 

LOR  B 

A 

_STW  3 

A 

3 

♦  WORD  TO  WS3 

70241* 

63224422 

CCL  B 

B 

CIL  B 

B 

3 

B  ■  -M- 

70242* 

23116421 

LDW  1 

A 

3 

CH.  NO.  TO  A 

— 

-  - 

LOR  B 

A 

70243* 

21612673 

STW  6 

A 

3 

-WORD  TO  WS6 

LDI  P  C 
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70244*  32003000 


3200 

3000 


RANDOM 
CM.  01 


_ SELECT  ADf BCE 

L&Ck  COM  TO  01 

T  TO  B 
10000.  TO  C 

10000*1816) 


4000 


70250* 

70750440 

CPF 

P 

L 

CLP 

6 

40 

# 

JUMP  T0  MPY  1 

70251* 

07-3763-42. .  _ 

_ CLD- 

0  37  _ 

CCL 

D 

B 

# 

-1.0  1B16)  fi 

70252* 

55123024 

ADL 

A 

B 

9 

B  >  10000  T- 

TNZ 

B 

S 

9 

IS  B  P0S1TITI 

70253* 

07Q416Q5 

CLD_ 

04 

9L 

N0  .•  D  »  4 

FTR 

05 

70254* 

26734512 

LDI 

P 

c 

9 

YES  -  C  «  10 

EXC 

A 

B 

70255* 

12000000 

1200 

9 

10*0  (85) 

0000 

70256* 

70750440 

CPF 

P 

L 

CLP 

0 

40 

9 

JUMP  T0  MPY 

70257* 

07056344 

CLD 

0 

05 

CCL 

D 

D 

9 

D  m  “6 

70260* 

55140000 

ADL 

A 

D 

N6P 

70261* 

21540000 

STH 

5 

D 

N0P 

70262* 

00000000 

N0P 

N0P 

70263* 

23520000 

LDW 

5 

B_ _ 

9 

WS5  T0  B 

N0P 

70264* 

05036631 

LRC 

3 

9 

DELAY  4  MIC* 

SSL 

L0L  A 

70265* .94223027 

CDL 

B 

B 

9 

B  .  B-l 

TNZ 

B 

SXF 

9 

B  .  0? 

70266* 

14760000 

BTR 

1 

9 

N0  .  L00P 

N0P 

70267* 

23631023 

LDW 

6 

C 

9 

YES  -  M  T0  6 

DTR 

2 

c 

9 

DTR  8UT  M 

70270* 

23312161 

LDW 

3 

A 

STW 

6 

A 
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70271* *  21333733 _ STH  3  C _ . _ EiCHANCEHS*  AND  H$6 

TOT  SH  3  .  SW3  •  1? 


70272*  14310000  BTR  38  •  YES  -  NEW  T  AND  M 

NfiP 


70273*  37341411 _ TCT_SW  4  ,  N0  -  SW4-12 _ 

BTR  54  •  YIS  -  BUTPUf  D1ST0RTED 


70274*  37361413  TCT  $W  6  ,  SN6  *  1? 

— - BTR-  52 — *_  _Yti-»  NEW  Ctf.  REQUEST 

70275*  00001465  _ _  NflP _ _ _ _ _ _ 

BTR  10  ,  N0  -  L90P 


LDR 


LDR  »  END  A/0  CH.  RESRSNSE  TEST 

*  00070100  END  0  70100 
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ANALOG  OUTPUT  CHANNEL  RESPONSE  [SQUARE  WAVE] 

TURN  OFF  ALL  SENSE  SWITCHES. 

SELECT  MODE: 

SW1  MODE  1  -  TYPE  IN  VARIABLES 

SW2  MODE  2  -  SUPPLY  VARIABLES  VIA  A/I  100  AND  101 


MODE  1  SELECTED. 

AFTER  SPECIFYING  ANALOG  OUTPUT  CHANNEL  IN  OCTAL,  TYPE  IN  T  AND  M 
IN  DECIMAL  AND  OBSERVE  OUTPUT.  SENSE  SWITCH  OPTIONS  ARE  AS  FOLLOWS 

SW3  ENTER  NEW  T  AND  M 

SW4  OUTPUT  DISTORTED 

SW6  NEW  CHANNEL  NO.  REQUEST,  SAME  MODE 


A/O  CHANNEL  NUMBER  200 

T  =  1.0 

M  =  1023. 

T  =  1.0 

M  =  512. 

A/O  CHANNEL  NUMBER  201 

T  =  .5 

M  =  512. 

A/O  CHANNEL  NUMBER  201 

T  =  1.0 

M  =  512. 


OUTPUT  DISTORTED 
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ANALOG  OUTPUT  CHANNEL  RESPONSE  [SQUARE  WAVE] 

TURN  OFF  ALL  SENSE  SWITCHES. 

SELECT  MODE.' 

SW1  MODE  1  -  TYPE  IN  VARIABLES 

SW2  MODE  2  -  SUPPLY  VARIABLES  VIA  A/I  103  AND  101 


MODE  2  SELECTED 


AFTER  SPECIFYING  ANALOG  OUTPUT  CHANNEL  IN  OCTAL,  VARY  T  AND  M 
VIA  A/I  100  AND  A/I  101,  RESPECTIVELY,  AND  OBSERVE  OUTPUT. 
~>ENSE  SWITCH  OPTIONS  ARE  AS  FOLLOWS: 

SW3  TYPE-OUT  T  AND  M 

SW4  OUTPUT  DISTORTED 

SW5  READ  NEW  T  OR  M 

SW6  NEW  CHANNEL  NO.  REQUEST,  SAME  MODE 


A/O  CHANNEL  NUMBER 
T 

M  = 

A/O  CHANNEL  NUMBER 
T  = 

M  = 

A/O  CHANNEL  NUM3ER 
T  = 

M  = 

T  = 

M  = 


200 

0.983210 

25. 

201 

0.984187 

25.  OUTPUT  DISTORTED 

202 

0.984187 

25. 

0.983698 

23. 
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PB-440  PROGRAM  ABSTRACT 


PROGRAM  TITLE: 

COMPUTER  CLOCK  AND  REAL-TIME  CLOCK 
MEASUREMENTS 

PROGRAMMER: 

D.  R.  GUM 

DATE: 

1  July  1964 

ID: 

None 

FUNCTION: 

m-  v 

The  purpose  of  this  program  (part  of  the  ADIOCE  Ac¬ 
ceptance  Test  package )  is  to  measure  the  accuracy  of  the 
PB-440  computer  clock  and  the  ADIOCE  Real-Time 
L  clock. 

GENERAL  DESCRIPTION 

OF  TECHNIQUE: 

There  are  three  tests  that  can  be  performed  using  this 
program.  The  tests  are:  (1)  Computer  Clock  vs.  Real- 
Time  Test,  (2)  Real-Time  Clock  vs.  Real-Time  Test,  and 
(3)  Computer  Clock  vs.  Real-Time  Clock  Test.  These 
tests  are  selected  by  sense  switches  1,  2,  and  3,  respec¬ 
tively.  Tests  1  and  2  have  two  modes  each;  a  mode  using 
a  clock  with  a  second  hand  as  a  timing  reference  and  a 
mode  using  a  60-cycle  line  input  to  ADIOCE  as  a  timing 
reference.  The  program  is  written  to  essentially  make 
timers  of  the  PB-440  and  ADIOCE  which  are  compared 
with  the  above  mentioned  references.  The  program  types 
the  accumulated  time  in  the  clock  reference  mode  and 
the  accumulated  time  of  both  the  reference  and  the  device 
being  tested  and  the  percent  error  as  compared  to  the 
reference.  The  first  time  typed  out  in  this  mode  is  the 
reference  time. 

LOADING  PROCEDURE: 

Load  with  Binary  Loader  I.  This  program  is  not  re¬ 
locatable. 

OPERATING  PROCEDURES  & 
LINKAGE  REQUIRED: 

The  program  will  type  instructions  to  the  operator  as  indi¬ 
cated  on  the  sample  test  type-out  sheet.  The  operator 
must  provide  the  60-cycle  square  wave  reference  input 
through  discrete  input  channel  I  of  Group  I,  which  is  the 
sign  bit  of  the  24-bit  input  word.  This  program  uses  five 
subroutines  which  must  be  stored  as  follows: 
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PROGRAM  STORAGE: 


INTERMEDIATE  STORAGE: 
SPECIAL  STORAGE: 
EXECUTION  TIME: 


REGISTERS: 

SENSE  SWITCHES: 
PROGRAM  FLAGS: 
I/O  DEVICES: 
PROGRAM  HALTS: 


Program  Segment 

Octal  Locs. 

Total 

Main  Program 

70100-70410 

311 

Interrupt  Routine 

70000-70013 

14 

Comments 

1000-1312 

313 

Micro  Type 

450-461 

12 

Decimal  Output 

500-621 

122 

Micro  Multiply 

70040-70051 

12 

Micro  Divide 

70060-70067 

10 

1016s 

Working  Storage:  1,  2,  3,  5,  and  6 
Core  Zero:  Micro  Type  Address 

The  program  execution  time  is  not  of  importance;  how¬ 
ever,  the  tests  should  not  be  run  for  longer  than  the  fol¬ 
lowing  times  to  prevent  overflow  from  the  timing  register. 

Computer  Clock  vs.  Real-Time  Test 
Mode  4  —  1000  hours 

(For  an  accuracy  of  .01%  should  run  for  at  least  3  hours) 
Mode  5  —  1  hour 

(For  an  accuracy  of  .01%  it  should  run  for  at  least  2 
minutes) 

Real-Time  Clock  vs.  Real-Time  Test 
Mode  4  —  1000  hours 

(For  an  accuracy  of  .01%  it  should  run  for  at  least  3 
hours ) 

Mode  5—10  hours 

(For  an  accuracy  of  .01  %  it  should  run  for  at  least  2 
minutes) 

Computer  Clock  vs.  Real-Time  Clock  Test 
Single  Mode  —  10  hours 

(For  an  accuracy  of  .017®  it  should  run  for  at  least  2 
minutes) 

All  used 

As  shown  on  sample  test  type-out  sheet. 

1-5  indicating  test  and  mode 
Typewriter  and  ADIOCE 
None 
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COMPUTER  CLOCK  AND  REAL-TIME  CLOCK  MEASUREMENTS 
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1 


88 


PF  5  =  1 


i 


Type  Mode  5 
and 

Instructions 


0 


WS  1  = 

=  Ax.  1 

\ 

1 

WS  2  = 

Bxl/1.2 

90 


© 


B  =  1 

B  +  1 

i 

Replace 

Dl  1 n  —  i 
with 

Dl  1„ 

r 

C  =  1 

M  Sec. 

C  =  1  M  S«c. 

l _ 

1 

n 

II 

n 

1 

n 

A  =  A  +  1 

\ 

A  =  A  +  1 

- Ri  W - 

91 


2 


92 


93 


A  = 

-1 

p 

1  Sec.  to 
Adioce 
Clock 


i 


Turn  Off 
Interrupt 


1 


Turn  Off 
Interrupt 


i 


IM  2  =  1 


A  =  A  +  T 

WS  1 

=  A 

94 


95 


96 


Adioce 

Interrupt 
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PF  3  =  1 

n 

Type  Test  3 
and 

Instructions 


98 


99 


100 


101 


ldr 

COMPUTER  CL0Ck  AND  REAL-TIME  CL0CK 

l_DR 

i 

1  APRIL  1965 

* 

Lee  e  70100 

70100* 

02700000 

CTS  7  0 

N0  P 

4 

0  T 0  all  toggles 

7  0  1 0 1  * 

26712501 

LDI  P  A 

STM  0  A 

4 

STORE- MICRO  TYPE 

70102* 

00000450 

0000 

0450 

4 

ADDRESS  IN  CORE  0 

70103* 

27034573 

ldm  o  c 

EXC  P  C 

4 

4 

TYPE  ©UT  MAIN  TITLE 

and  test  selections 

70104* 

07001000 

0700 

1000 

70105* 

02700000 

CTS  7  0 

NSP 

» 

0  T0  ALL  TOGGLES 

70106* 

37311603 

TCT  SW  1 
FTR  3 

i 

4 

SW  1  ■  1? 

YES 

7  0 1 O7  * 

37321671 

TCT  SUI  2 
FTR  ©  71 

4 

s 

N0,  SW  2  .  1? 

yes 

70110* 

37331667 

TCT  SW  3 
FTR  0  67 

i 

4 

N®,  SW  3  >  1? 

YES 

7  0 1 1 1  * 

14740000 

BTR  3 

N0P 

i 

N®,  TEST  AGAIN 

70112* 

36010000 

STT  PF  1 
N0P 

* 

test  [  i  i 

7  0  1 1 3  * 

27034573 

LDM  Q  C 
EXC  P  C 

0 

0 

TYPE  0UT  TEST  Cl]  TITLE  ANd 
MODE  SELECTIONS 

70114* 

04701070 

0470 

1  070 

70115* 

37341602 

TCT  SW  4 
FTR  2 

4 

\ 

0 

S  W  4  *  1  ? 

YES,  G 0  T 0  M0DE  4 

70116* 

37351617 

TCT  SW  5 
FTR  0  1 7 

0 

0 

N0,  SW  5  ■  1? 

YES,  G0  T 0  M0DE  5 

70117* 

14750000 

BTR  2 

NSP 

0 

N0,  TEST  AGAIN 

70120* 

36040000 

ST1  PF  4 
N0P 

0 

M0DE  [1-4] 

70121* 

27034573 

LDM  (J  c 
EXC  P  C 

0 

0 

TYPE  0UT  MODE  4  SELECTED 

AND  INSTRUCTIONS 

70122* 

03201 137 

0320 

1  137 
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70123*  46010000 

CPL  0  A 
N0P 

9 

clear  a 

70124*  37341477 

TCT  SW  4 

0 

SW  4  *  o? 

BTR  0 

0 

N© 

70125*  37361606 

TCT  SW  6 

0 

SW  6  ■  1? 

PTR  6 

0 

YES,  TYPE  0UT  TIME  <6r) 

70126*  00002673 

NOP 

ID  1  P  c 

70127*  00606476 

0060 

0 

1  SEC  1  NT 0  C 

6476 

i 

(1000000/51-2 

70130*  54333233 

CD L  C  C 

i 

C  *  C-l  DECREMENT  C0UNTER 

TZ0  C  XF 

0 

C  *  0? 

70131*  16012700 

FTR  1 

LDM  Q  0 

9 

YES,  (10  MICR0SEC0ND  L00P) 

70132*  1 4750000 

BTR  2 

N0P 

0 

N0,  (5  M1CR0SEC0ND  L00p) 

70133*  44111471 

CIl  A  A 

BTR  6 

70134*  2  1  1  10000 

STL  1  A 
N6P 

0 

G®  T 0  TYPE  ®UT  TIME  < 6B 1 

70135*  16771631 

FTR  0  77 
FTR  0  31 

70136*  36050000 

3 T T  PF  5 
N0P 

0 

M0DE  [1-5] 

70137*  27034573 

LDP  0  C 

\ 

9 

TY=>E  0UT  M0DE  5  SELECTED 

EXC  P  C 

• 

AND  instructions 

70140*  02501171 

0250 

1171 

70141*  46014602 

CPL  0  A 

B 

Cl  EAR  A 

CPL  0  B 

B 

clfar  b 

70142*  26741244 

LD  I  P  D 
SEL  D  D 

0 

SELECT  AD  1 0CE  CH.  o  <001 

70143*  32001000 

3200 

tooc 

9 

(RANDOM ) 

70144*  37361622 

TCT  SW  6 

0 

SW  6  «  1? 

FTR  0  22 

9 

yes,  g©  to  error  tyre  ©ut  ( 

70145*  65602774 

C  0M  6  0 

LDM  P  d 

7 0146*  00000021 

0000 

0021 

9 

GROUP  1  ADDRESS 

70147*  1Q342333 

DTP  3  D 

9 

discrete  input  group  i 
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LDW 

3  C 

70150*  73433234 

ADS 

D  C 

TZ© 

c  s 

70151*  16070000 

FTR 

7 

N0P 

70152*  21344422 

STW 

3  D 

CIL 

B  B 

70153*  26730000 

LDI 

P  C 

N6P 

70154*  00000302 

0000 

0302 

70155*  54333233 

CDL 

c  c 

TZ© 

C  XF 

70156*  00001601 

N@P 

FTR 

1 

70157*  14750000 

BTR 

2 

N  0  P 

70160*  44111463 

CIL 

A  A 

BTR 

0  14 

70161*  00002673 

N©P 

LDI 

P  C 

70162*  00000302 

ocoo 

C3  02 

70163*  54333233 

CDL 

c  c 

TZ© 

C  XF 

70164*  00001601 

N0P 

FTR 

1 

70165*  14750000 

BTR 

2 

N0P 

7c  1 66  *  441  1  1455 

CIL 

A  A 

BTR 

©  22 

70167*  21112122 

STW 

1  A 

STw 

2  B 

70170*  26730000 

LD  I 

P  C 

NQP 

70171*  32525252 

3252 

5252 

70172*  46750440 

C  PL 

P  L 

CLP 

©  40 

70173*  21212312 

STW 

2  A 

ldw 

1  B 

L0AD  PAST  D I  VALUE 

HAS  DI  1  CHANGED? 

N© 

YES,  ST0RE  NEW  DI  (LEFT  L00P) 
B  «  B  +  1 

( 1 000/5  )-6 

C  *  C-l  DECREMENT  TIMER 
C  .  0? 

YES 

N0 

A  ■  A  +  1 

(RIGHT  L00P) 

(  1000/5 )-6 

c  .  c-l 

c  «  o? 

YES 

N0 

A  *  A  +  1 

A  INT©  WS  1 
B  INT©  WS  2 

1/1.20  INT©  C 

1/1.20 

6  X  1/1.20  INT©  A 
B  X  1/1.20  INT©  WS2 
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70174* 

26730000 

LDI  P  C 
N0P 

i 

.  1  I NT0  C 

7oi75* 

03146314 

0314 

6314 

i 

*1 

- - -  - 

70176* 

46750440 

C PL  P  L 
CLP  6  40 

4 

A  X  ,1  INT0  A 

70177* 

21111665 

STW  1  A 
FTR  3  65 

4 

G0  TO  ERR0R  TYPE 

0UT  (6A) 

70200* 

16660000 

FTR  0  66 

N0P 

0 

0 

INTERMEDIATE  TRANSFER 

T 0  TEST  13] 

70201* 

36020000 

STT  PF  2 
N0P 

0 

TEST  [2] 

70202* 

27034573 

LDM  0  c 
EXC  P  C 

0 

type  0UT  TEST  [2] 

title 

70203* 

01301244 

0130 

1244 

70204* 

27034573 

ldm  0  c 
EXC  P  C 

0 

TYPE  0UT  MODE  SELECT  1 0NS 

70205* 

03401103 

0340 

1103 

70206* 

37341602 

TCT  SW  4 
FTR  2 

0 

0 

SW  4  •  1? 

YES.  M0DE  4 

7020 7* 

37351622 

TCT  SW  5 
FTR  0  22 

0 

0 

N0,  SW  5  «  1? 

YES.  M0DE  5 

70210* 

14750000 

BTR  2 

N0P 

0 

N 9 ,  TEST  AGAIN 

70211* 

36040000 

STT  PF  4 
NGP 

0 

M0DE  C2-4] 

70212* 

27034573 

ldm  q  c 

EXC  P  C 

0 

0 

type  sut  mode  4  selected 

AND  INSTRUCTIONS 

70213* 

03201137 

0320 

1137 

70214* 

26732674 

LDI  P  C 

LDI  P  0 

7  02 1 5  * 

00040001 

0004 

0001 

0 

0 

100  MICR0SEC0NDS 
MINIMUM  C0UNT 

F0R  tir 

7  02  1 6  * 

32003077 

3200 

3077 

0 

i 

SELECT  W0RD  (RAND0M) 

Ch.  1  (01) 

7  02 1 7  * 

12446561 

SEL  D  D 
C@M  6  A 

0 

> 

SELECT  AD  I 0CE 

LOCK  C0M  T@  CH.  1 

(01  ) 

70220* 

10632673 

DTR  6  C 

LDI  P  C 
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7 0221*  00063420 

0006 

1 

1  SEC  F8R  TIR 

3420 

70222*  37341477 

TCT  SW  4 

\ 

• 

SW4  •  0? 

BTR  0 

l 

N0 

70223*  35421477 

TCP  IL  2 
BTR  0 

i 

i 

YES,  IL  2  -  0? 

YES 

70224*  54011063 

CDL  0  A 

i 

Ni,  A  --T 

DTR  6  C 

i 

1  SEC  I NT0  TIR 

7 0225*  26741244 

LDI  P  D 
SEL  D  D 

» 

TURN  0FF  INTERRUPT 

70226*  72000400 

7200 

0400 

70227*  65003612 

CBM  0  Q 
STT  IM  2 

• 

SET  IM  2  TRUE 

70230*  37361635 

TCT  SW  6 

, 

SW6  2  1? 

FTR  0  35 

i 

YES,  TYPE  0UT  TIME  < 6B ) 

70231*  14760000 

BTR  1 

NBP 

i 

N0  TEST  AGAIN 

70232*  36050000 

STT  PF  5 
N9P 

, 

M0DF  [2-5] 

70233*  27034573 

LDM  0  C 

\ 

s 

TYPE  0UT  M0DE  5  SELECTED 

EXC  P  C 

i 

and  instructions 

70234*  02501171 

0250 

1171 

70235*  26732674 

LDI  P  C 
LDI  P  D 

70236*  00040144 

0004 

0144 

# 

10  MSEC  F0R  TIR 

70237*  32002077 

3200 

* 

SELECT  W9RD  <SEQ) 

2077 

i 

CH.  1  (01) 

70240*  12446561 

sel  d  d 

# 

SELECT  ADI0CE 

CBM  6  A 

» 

L0CK  C0M  T0  CH.  1  (01) 

70241*  10636500 

DTR  6  c 
C0M  0  Q 

9 

10  MSEC  INT0  TIR 

70242*  46014602 

CPL  0  A 

$ 

clear  A 

CPL  Q  B 

9 

Clear  b 

70243*  35421477 

TCF  IL  2 

\ 

9 

IL  2  *  1? 

BTR  0 

9 

N0 

70244*  26741244 

LDI  P  D 
SEL  D  D 

9 

YES.  RELEASE  INTERRUPT 

7q245*  72000400 

7200 

106 


0400 


70246* 

36120000 

STT 

IM 

2 

N0P 

70247  * 

26741244 

LDI 

P 

D 

SEL 

D 

0 

70250* 

32003000 

3200 

3000 

70251* 

37361606 

TCT 

SW 

1  6 

FTR 

6 

70252* 

07216561 

CLD 

0 

21 

COM 

6 

A 

70253* 

10346500 

DTR 

3 

D 

COM 

0 

0 

70254* 

23337343 

ldw 

3 

c 

ads 

D 

c 

70255* 

32341473 

TZO 

C 

s 

BTR 

4 

70256* 

21344422 

STW 

3 

D 

CIL 

B 

8 

70257* 

14710000 

BTR 

6 

N0P 

70260* 

21112122 

STW 

1 

A 

STW 

2 

0 

70261* 

26730000 

LDI 

P 

C 

N0P 

70262* 

32525252 

3252 

5252 

70263* 

46750440 

CPL 

P 

L 

CLP 

0 

4  0 

70264* 

21210000 

STW 

2 

A 

N0P 

70265* 

16330000 

FTR 

0 

33 

NOP 

70266* 

16771607 

FTR 

0 

77 

FTR 

7 

70267* 

36030000 

STT 

PF 

’  3 

N0P 

70270* 

27034573 

ldm 

Q 

C 

EXC 

P 

C 

70271* 

03401257 

0340 

1257 

SET  1  M2  TRUE 

SELECT  ADI9CE  ( RANDOM  ) 

SW  6  «  1? 

YES 

N0,  D I  GR0UP  1  ADDRESS 
L0CK  COM  T©  CH.  1  (01) 

discrete  input  group  i 

L0AD  PAST  D I  1  VALUE 

HAS  D I  1  CHANGED 
N0 

YES,  ST6RE  NEW  VALUE 
B  .  B  ♦  1 


1/1.? 

fa  X  1/1.2  INTO  A 

B  X  1/1 .2  INT0  WS  2 
TRANSFER  T 0  TYPE  0UT  ERROR  <6a> 
TRANSFER  T0  TYPE  0UT  TIME  ( 68 ) 
TEST  t  3 ] 

TYPE  0UT  TEST  13] 

TITLE  AND  INSTRUCTIONS 
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7 0272* 

26732674 

LDI 

P 

c 

LD  I 

P 

D 

70273* 

00040144 

0004 

0144 

70274* 

32004077 

3200 

4077 

70275* 

12446562 

SEL 

D 

D 

C0M 

6 

B 

70276* 

10636500 

DTR 

6 

c 

C0M 

0 

Q 

70277* 

46014602 

CPL 

Q 

A 

CPL 

Q 

B 

70300* 

35431477 

TCF 

IL 

.  3 

BTR 

0 

7030 1  * 

26741244 

LDI 

P 

D 

SEL 

D 

D 

70302* 

72000400 

7200 

0400 

70303* 

36130000 

STT 

II- 

1  3 

N0P 

70304* 

37361606 

TCT 

Sk 

1  6 

FTR 

6 

70305* 

00002673 

N0P 

LDI 

P 

C 

70306* 

00003716 

0000 

3716 

70307* 

54333233 

CDL 

c 

C 

TZ© 

c 

XF 

70310* 

16012700 

FTR 

1 

ldm 

Q 

Q 

7  0  3  1  1  * 

14750000 

BTR 

2 

N0P 

70312* 

44111471 

CIL 

A 

A 

BTR 

6 

7o3  13* 

21112122 

STW 

1 

A 

ST  W 

2 

B 

70314* 

26730000 

LD  I 

P 

C 

N0P 

703l5* 

00025231 

0002 

5231 

70316* 

46750440 

CPL 

P 

L 

CLP 

0 

4  0 

10  MSEC  F0R  TIR 

SELECT  W0RD  ( SEO.  ) 

CH,  2  (10> 

SELECT  ADI0CE 

L0CK  C0M  T0  CH.  2  ( 10 ) 

10  MSEC  I NT@  TIR 

clear  a 
clear  b 

IL  3  «  1? 

N0,  TEST  AGAIN 

YES 

TURN  0FF  INTERRUPT 


SET  IM  3  TRUE 


SW  6  ■  1? 

YES,  G0  T 0  ERR0R  TYPE  @UT  ( 6A ) 

N0,  L0AD  REGISTER  TIMER 
10  MSEC  INT0  C 

( 1 0000/5  ) "2 

C  E  C  “  1 
C  E  0? 

YES,  (10  M  I CR0SEC0ND  L00P I 
N0,  (5  M I CR0SEC0ND  L00P) 


A  b  A  +  1 


A  I  NT©  WS  1 

e  I  NT 0  ki S  2 


.0013 


B  y  .0013  I  NT©  A 
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70317* 

23125521 

LDW  1 

B 

ADL  B 

A 

i 

A  ♦  B  (DELTA  T) 

I  NTS 

70320* 

21 1 10000 

STW  1 
N0P 

A 

* 

i 

CBRRECTED  A  I NT0  WS1 
60  T 0  TYPE  0UT  ERROR 

70321* 

34123413 

STF  I  M  2 
STF  IM  3 

i 

i 

SET  I M  1. FALSE  (6A) 
SET  IM  2  FALSE 

70322* 

23222673 

LDW  2 
LD I  P 

B 

C 

\ 

0 

WS2  I NT0  B 

70323* 

00243656 

0024 

3656 

i 

.01 

70324* 

46750440 

C PL  P 
CLP  6 

L 

40 

; 

B  X  .01  I NT0  A 

70325* 

05101320 

LRC  0  10 
SDL  L0M 

i 

SCALE  B  15 

70326* 

21510000 

STW  5 
N0P 

A 

0 

A  INT0  WS5 

70327* 

27034537 

ldm  q 

EXC  C 

C 

P 

\ 

0 

TYPE  0UT  (TIME  » 

) 

70330* 

01001216 

0100 

1216 

70331* 

23520517 

LDW  5 
CLN  0 

B 

17 

70332* 

26754557 

LD  I  P 
EXC  L 

L 

P 

i 

TYPE  0UT  NUMBER 

70333* 

00400500 

0040 

0500 

70334* 

27034537 

LDm  Q 
EXC  C 

C 

P 

0 

type  @ut  seconds 

70335* 

00301226 

0030 

1226 

70336* 

23122673 

LDW  1 
LD  I  P 

B 

C 

70337* 

00243656 

0024 

3656 

0 

•  01 

7 0340* 

46750440 

C PL  P 
CLP  0 

L 

40 

\ 

0 

0  X  ,01  I NT0  A 

7034 1  * 

05101320 

LRC  0  10 
SDL  L0m 

0 

SCALE  B  15 

70342* 

21610000 

STW  6 
N0P 

A 

70343* 

27034537 

ldm  Q 

C 
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EXC  CP  i 


type  out  (time  ■> 


7 0344* 

01001216 

0100 

1216 

70345* 

23620517 

LOW  6  B 

CLN  0  17 

70346* 

26754557 

LDI  P  L 
EXC  L  P 

i 

TYPE  OUT 

NUMBER 

70347* 

00400500 

004Q 

0500 

70350* 

27034537 

ldm  o  c 

EXC  C  P 

; 

TYPE  0UT 

SECONDS 

70351* 

00301226 

0030 

1226 

70352* 

23112323 

LDM  1  A 
LOW  2  C 

70353* 

05016623 

LRC  1 

SSL  L0M  C 

70354* 

46750460 

CPL  P  L 
CLP  0  60 

4 

WS1/WS2 

SCALED  Bi 

70355* 

46016101 

CPL  Q  A 
CCS  0  A 

70356* 

05016671 

lrc  1 

SSL  R0L  A 

i 

1  SCALED 

B  1 

70357* 

61010000 

CCS  0  A 
N0P 

70360* 

55122673 

ADL  A  B 

LDI  P  C 

» 

( WS1/WS2 

-  1  )  SCALED  Bl 

70361* 

00000144 

0000 

0144 

70362* 

46750440 

CPL  P  L 
CLP  0  40 

9 

( WS1/WS2 

-1  >  X  1 0  0  INT0  B 

70363* 

05031362 

LRC  3 

SDL  r@m  b 

9 

SCALE  84 

70364* 

72122132 

CPS  A  G 
STW  3  B 

70365* 

27034537 

LDM  0  c 
EXC  C  P 

9 

TYPE  0UT 

( error  ■  ) 

70366* 

01001231 

0100 

1231 

70367  * 

23320504 

LDW  3  B 
CLN  4 

no 


TYPE  0UT  NUMBER 


70370* 

26754557 

LDI  P  L 
EXC  L  P 

70371* 

00000500 

0000 

0500 

70372* 

27034573 

ldm  q  c 
EXC  P  C 

70373* 

00301241 

0030 

1241 

70374* 

16100000 

FTR  0  10 
N0P 

70375* 

34113412 

STF  IM  1 
STF  IM  2 

70376* 

27034537 

ldm  q  c 
EXC  C  p 

70377* 

01001216 

0100 

1216 

70400* 

23120527 

LDW  1  B 
LRC  3  27 

70401* 

26754557 

LDI  P  L 
EXC  L  P 

70402* 

00600500 

0060 

0500 

7  04  03  * 

27034537 

LDM  0  c 
EXC  C  P 

70404* 

00301226 

0030 

1226 

70405* 

35301601 

TCF  SW  X 
FTR  1 

70406* 

14760000 

BTR  1 

N0P 

70407* 

27770000 

ldm  p  p 

NSP 

70410* 

00070105 

0007 

0105 

LDR 

LOR 

* 

L0C  0  70 

70000* 

45750404 

EXC  P  l 
CLP  4 

70001* 

45*50404 

EXC  P  L 
CLP  4 

TYPE  0UT  (PERCENT) 


SET  IM  0  F  A  USE ( 68 ) 
SET  IM  1  FALSE 

TYPE  0UT  (TIME  «> 

WS1  INTO  B 
0UTPUT  NUMBER 


TYPE  0UT  ( SEC0NDS  ) 


ALL  SW  OFF? 


NO 


YES,  RETURN  FOR 
NEW  TEST  TEND] 
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7 0002* 

45750410 

EXC  P 

L 

CLP  9 

10 

70003* 

00000000 

NOP 

NOP 

70004* 

44112111 

CIL  A 

A 

A  ■  A  + 

1  TEST  (2- 

ST  W  1 

A 

70005* 

26741244 

LDl  P 

D 

SEL  0 

D 

« 

RELEASE 

INTERRUPT 

7 0006* 

72000400 

7200 

0400 

70007* 

45576500 

EXC  L 

P 

« 

RETURN 

CSM  0 

Q 

70010* 

44220000 

CIL  B 
NOP 

B 

# 

B  *  R  + 

1  TEST  [3] 

70011* 

26741244 

LDI  P 

D 

SEL  D 

D 

# 

RELEASE 

INTERRUPT 

70012* 

72000400 

7200 

0400 

70013* 

65004557 

COM  0 

Q 

EXC  L 

P 

RETURN 

ldr 

* 

00070100 

end  0 

7010 

0 

aND  5] 
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COMPUTER  CLOCK  AND  REAL  TIME  CLOCK  TESTS 


SELECT  TEST   

SW1  -  COMPUTER  CLOCK  VS  REAL  T IMF 

SW2  -  REAL  TIME  CLOCK  VS  REAL  TIME 

SW3  -  COMPUTER  CLOCK  VS  REAL  TIME  CLOCK 


COMPUTER  CLOCK  VS  REAL  TIME  TEST 


SELECT  MODE 

SV/4  -  CLOCK  REFERENCE 

SW5  -  60  CYCLE  LINE  REFERENCE 


HOPE  5 


SW6  CM  FOR 

TIME  AMD  PER  CENT 

ERROR  TYPE-OUT, 

xmE 

=  1200. 41 

SECONDS 

TIME 

=  1200.34 

SECONDS 

 ERROR 

=  -  0 .005342  PER  CENT 
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SW3  -  COMPUTER  CLOCK  VS  REAL  TIME  CLOCK 


REAL  TIME  CLOCK  VS  REAL  TIME  TEST 


SELECT  MODE 

SW4  -  CLOCK  REFERENCE 

SW5  -  60  CYCLE  LINE  REFERENCE 


MODE  5 

SW6  ON  FOR  TIME  AND  PER  CENT  ERROR  TYPE-OUT . 
T I  ME  =  1200.27  ^ SECONDS 

TIME  =  1200.21  SECONDS 

ERROR  =  -  0.005006  PER  CENT 
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COMPUTER  CLOCK  AtlD  REAI  TIME.  CLOCK-T-ESXS 


SELECT  TEST 


S\;i  -  COMPUTER  CLOCK  VS  REAL  TIME 


SW2  -  REAL  TIME  CLOCK  VS  REAL  TIME 


SW3  -  COMPUTER  CLOCK  VS  REAL  TIME  CLOCK 


COMPUTER  CLOCK  VS  REAL  TIME  CLOCK  TEST 


SU6  ON  FOR  TIME  AMD  PER  CENT  ERROR  TYPE-OUT. 

TIME = 1200.25  SECONDS 

LIME = 1200.12  SECONDS 

ERROR  = - J.009180  PER  CENT 
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Appendix  II. 

AUTOMATED  DIAGNOSTIC  TEST  UTILITY  ROUTINES 


PB-440  PROGRAM  ABSTRACT 


PROGRAM  TITLE: 

MICRO  MULTIPLY 

PROGRAMMER: 

P.  A.  KNOOP 

DATE: 

9  June  1964 

ID. 

None 

FUNCTION: 

The  purpose  of  this  program  is  to  serve  as  a  micro  sub¬ 
routine  for  multiplication.  This  routine  is  part  of  the 
ADIOCE  Acceptance  Test  package. 

TECHNIQUE: 

The  program  multiplies  the  contents  of  the  B  and  C  regis¬ 
ters,  stores  the  product  in  the  coupled  A-B  registers,  and 
returns  control  to  the  address  provided  in  the  L  register. 
The  calling  address  is  70040  in  the  ADIOCE  Acceptance 
Test  package. 

LOADING  PROCEDURE: 

Load  with  Binary  Loader  I.  This  routine  is  relocatable 
for  general  use  but  must  be  stored  beginning  at  70040 
for  the  ADIOCE  tests. 

OPERATING  PROCEDURES  & 
LINKAGE  REQUIRED: 

None 

PROGRAM  STORAGE: 

Program  Segment  Octal  Locs.  Total 

Main  Program  70040-70051  128 

INTERMEDIATE  STORAGE: 

None 

EXECUTION  TIME: 

34-42  Microseconds 

REGISTERS: 

A  MSB  of  double-length  product 

B  multiplicand;  LSB  of  double-length  product 

C  Multiplier 

D  Not  used 

N  Shift  Counter 

L  Return  Location 

P  Location  Counter 

SENSE  SWITCHES: 

Not  used 

PROGRAM  FLAGS: 

Not  used 

I/O  DEVICES: 

None 

PROGRAM  HALTS: 

None 
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MICRO  MULTIPLY 


N  - 

=  23 

1 

L 

Multiply 

B  •  C 

L 

Bs  to  As 

2's  Comp. 
Bm  to  Bm 

2's  Comp. 
Cm  to  Cm 

2's  Comp. 

n 

V  w 

Double 

/ - W 

Length 

Product 
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00001 

00002 

00003 

00004 

00005 

00006 

00007 

00010 

0001  1 

00012 


00001 

LDR 

00002 

ldr 

57113024 

00003 

X$R 

A 

A 

00004 

TNZ 

B 

S 

62224422 

00005 

C£m 

B 

B 

00006 

ClL 

B 

B 

73323034 

00007 

APs 

C 

B 

00006 

TNZ 

C 

S 

62334433 

00009 

C£M 

C 

C 

00010 

CXL 

C 

c 

05270000 

0001  1 

LRC 

23 

00012 

NOp 

15317221 

00013 

MfS 

C 

A 

00014 

CPS 

B 

A 

32147057 

00015 

TZe 

A 

S 

00016 

CPF 

L 

P 

62116222 

00017 

C£M 

A 

A 

0001* 

C£m 

B 

B 

44224061 

00019 

CIL 

B 

B 

00020 

aPk 

N 

A 

70570000 

00021 

CPF 

L 

P 

00022 

NpP 

00000000 

00023 

END 

A  * 

MICRO  MULTIPLY 

SUBROUTINE  -  ADIOCE  TESTS 

CLEAR  A 
B  POSITIVE??? 

NO  -  2*S  COMP.  B 

<C  ♦  B  ) S  TO  B ( s ) 

C  POSITIVE??? 

NO  -  2* S  COMP.  C 
N»23 

MULTIPLY 
SIGN  TO  A 

ANS  POSITIVE??? 

YES  *  RETURN 

NO  -  2* S  COMP. 

OBL  LENGTH  PRODUCT 

RETURN 
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PB-440  PROGRAM  ABSTRACT 


PROGRAM  TITLE: 

MICRO  DIVIDE 

PROGRAMMER: 

P.  A.  KNOOP 

DATE: 

9  June  1964 

ID: 

None 

FUNCTION: 

The  purpose  of  this  program  is  to  serve  as  a  micro  sub¬ 
routine  for  division.  This  routine  is  part  of  the  ADIOCE 
Acceptance  Test  package. 

TECHNIQUE: 

The  program  divides  the  contents  of  the  A  register  by  the 
contents  of  the  C  register  and  stores  the  quotient  in  the  B 
register.  It  then  returns  control  to  the  address  in  the  L 
register.  The  calling  address  is  70060  in  the  ADIOCE 
Acceptance  Test  package. 

LOADING  PROCEDURE: 

Load  with  Binary  Loader  I.  This  routine  is  relocatable 
for  general  use  but  must  be  stored  beginning  at  70060 
for  the  ADIOCE  tests. 

OPERATING  PROCEDURES  & 
LINKAGE  REQUIRED: 

None 

PROGRAM  STORAGE: 

Program  Segment  Octal  Locs.  Total 

Main  Program  70060-70067  10$ 

INTERMEDIATE  STORAGE: 

None 

EXECUTION  TIME: 

35-39  Microseconds 

REGISTERS: 

A  Dividend 

B  Quotient 

C  Divisor 

D  Not  used 

N  Shift  Counter 

L  Return  Location 

P  Location  Counter 

SENSE  SWITCHES: 

Not  used 

PROGRAM  FLAGS: 

Not  used 

I/O  DEVICES: 

None 

PROGRAM  HALTS: 

None 
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MICRO  DIVIDE 
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00001 

LOR 

# 

MICR0  DIVIDE 

00002 

lor 

• 

SUBR0UTINE  AD  I @CE  TESTS 

00001 

46027312 

00003 

cpi 

OB  # 

CLEAR  b 

00004 

ADS 

A  B 

00002 

73323234 

00005 

AOS 

C  B  , 

form  sign  0F  Quotient 

00006 

T?e 

C  S  . 

C  POSITIVE? 

00003 

63334433 

00007 

CCL 

C  C  , 

YES  -  2'S  COMP.  C 

00006 

cu 

C  C 

00004 

05273014 

00009 

L8C 

23  , 

N  .  23 

00010 

TNZ 

AS  # 

A  P6SITIVE? 

00005 

63114411 

00011 

C(2L 

A  A  , 

NO  -  2'S  COMP.  A 

00012 

cn 

A  A 

00006 

17313024 

00013 

D  Vs 

C  A  , 

DIVIDE 

00014 

TNZ 

B  S  • 

ANS  POSITIVE? 

00007 

62224422 

00015 

CgM 

B  B  , 

N0  -  2* S  COMP.  ANS 

00016 

ClL 

B  B 

00010 

70570000 

00017 

CPF 

L  P  • 

RETURN 

00018 

N0P 

00000000 

00019 

END 

A* 
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PB-440  PROGRAM  ABSTRACT 


PROGRAM  TITLE: 

DECIMAL  INPUT  II  (SUBROUTINE) 

PROGRAMMER: 

V.  A.  WAGNER 

DATE: 

30  April  1965 

PURPOSE: 

To  input  from  the  typewriter  and  convert  to  fixed  point 
decimal  the  numbers  typed.  Seale  (binary  point  position) 
desired  by  the  caller  is  put  in  the  N  register. 

METHOD: 

For  integer;  Multiply  by  10, 0  and  add  new  digit. 

For  fraction:  Treat  as  integer  then  divide  by  10L,  L  being 
the  number  of  digits  typed  behind  the  decimal  point.  The 
routine  scales  the  integer  until  the  decimal  point  is 

typed  (“.”);  then  it  normalizes  the  integer  (i.e.,  shifts 
left  until  Bj=l).  The  fraction  is  sealed  B0  and  shifted 
right  normalized  scale,  and  logically  “or”  d  with  the 
integer.  This  whole  word  is  then  shifted  left  or  right  to 
give  the  proper  scale.  If  it  needs  to  be  shifted  left  the 
number  is  too  large  for  the  given  scale  and  the  routine 
types  a  space,  a  “?”,  and  another  space  and  waits  for 
another  input. 

LOADING  PROCEDURE: 

Load  as  a  standard  BLI  tape. 

ENTRY  CONDITIONS: 

Use  the  following  calling  sequence: 

LDI  P  L 

EXC  P  L 

OCT  00000650 

EXIT  CONDITIONS: 

Seale  in  N 

Number  in  B 

Typewriter  disconnected 

Com  unlocked 

LINKAGE  REQUIRED: 

None 

MEMORY  REQUIREMENTS: 

6508  —  777 8 

SPEED: 

N/A 

ACCURACY: 

Full  23  bits  for  integers  only.  22  bits  for  integers  and 
fractions.  Last  bit  may  be  incorrect. 

SPECIAL  TOGGLES  USED: 

PF  6  —  negative  number 

PF  5  —  “  .  ”  has  been  input 

CT  All  normal  arithmetic  charges 

These  are  reset  at  end  of  program. 

REFERENCES: 

None 

REGISTERS  USED: 

All 
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SENSE  SWITCH  OPTIONS: 

None 

HALTS: 

None 

I/O  USAGE: 

Typewriter 

I/O  CHANNEL  ASSIGNMENT 

ALTERATIONS: 

Typewriter  connected  then  disconnected  from  Channel  3. 

NOTES: 

It  is  possible  to  use  this  routine  with  the  photo  reader  by 
selecting  the  photo  reader  on  Channel  3  before  calling 
this  routine.  This  routine  can  be  called  by  SCS  by  using 
the  following  calling  sequence: 

ETC  x  EXC  L  P 

LDI  P  L 

EXC  P  L 

00000650 

EXC  L  P 

NOP 

Next  Macro 
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DECIMAL  INPUT  II  (SUBROUTINE) 


125 


© 


126 


127 


128 


0 
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00650 

00651 

00652 

00653 

00654 

00655 

00656 

00657 

00660 

00661 

00662 

00663 

00664 

00665 

00666 

00667 

00670 

00671 


LDR\ 


LDR\D  ECIMKL  INPUT  II 
LDRW.  W  A  c  N  E  R~  27  SEPT  1965 

lDR\* *******************  ********** 


L0C\0  650 


46741610 

CPL  P  DUST  L@C  AT  1 @N  0F  *ST0RAGE*  T0  D 
FTR  0  i 0\SK I p  0VEB  *ST@R AGE* 

00000000 

0000\*****  STORAGE  ***** 

0000\** 

00000000 

i 

*  « 

«  * 

o  o 
o  o 
o  o 
o  o 

00000000 

*  « 

«  * 

o  o 
o  o 
o  o 
o  o 

00000000 

0000\** 

oooo\** 

cooooooo 

oooo\** 

oooo\** 

00000000 

oooo\** 

oooo\** 

oooooooo 

0000\** 

0000\** 

00000000 

cooo\** 

0000\*****  ST0RAGE  ***** 

23022104 

LDW  0  B\WS  0  T0  B 

STW  0  D\1ST  L0CATI0N  0F  *ST ©RAGE*  T0  WS0 

24422312 

STI  D  B\WS0  T0  1ST  L@C  AT  1 0N  F0  *ST0RAqe* 
LDW  1  B\WS  1  T0  B 

24422115 

STI  D  B \WS  1  T3  NEXT  L0CaTi0N  0F  *ST0RagE 
STW  1  l\RETlrn  ADDRESS  T0  WS  1 

46452674 

CPL  D  |_\*****  ***** 

LDI  P  D 

23132453 

2313 

2453NM0VE  THE  PEST  0F 

52440604 

CIX  D  D\WS  T 0  *ST0RAGE* 

E  P  D 

31771476 

T  F  7  7 

77732123 

CFS  7  C 

STW  2  C\SAVE  ALL  TOGGLES  IN  WS  2 

21366563 

STW  3  n\ST0RF  DESIRED  SCALE  IN  WS  3 
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00672 

00673 

00674 

00675 

00676 

00677 

00700 

00701 

00702 

00703 

00704 

00705 

00706 

00707 

00710 

007  1 1 

00712 

00713 

00714 

00715 


ck 

6 

C\lMCk  ce  UTAT0R  T]j  CHANNEL  3 

26^31203 

LOI 

P 

C\SELECT  TYPEWRITER  F0R  0UTPUT 

SEL 

Q 

C\&N  CHANNEL  3 

02006040 

0200 

6040 

02700760 

CTS 

7 

QNCLEAR  all  toggles 

CLD 

M 

60\(SP  )  Tg  D _ 

10240000 

DTR 

2 

D\0UTPUT  SPACE 

N6P 

07404143 

CLD 

0 

40 

ADF 

D 

CVSELECt  typewriter  for  input 

12034602 

SEL 

Q 

C\0N  CHANNEL  3 

CPL 

Q 

BNCLEAR  8 

10130000 

DTR 

l 

cmnplt  character 

N|«P 

07405734 

CLD 

0 

40\ ( *  )  T0  D 

X&R 

c 

D 

46013241 

CPL 

Q 

A\CLEAR  A 

TZ0 

D 

f\was  character  <-)  ? 

14743606 

BTR 

0 

03\ YES#  l?0  BACK  PICK  UP  NEXT  CHARACTER 

STT 

PF  6\  (  M  I  NllS  INDICATOR) 

07205734 

CLD 

0 

20\ ( ♦  )  T  0  D 

X0R 

c 

D 

32411472 

TZ0 

D 

f\was  character  (♦)  ? 

BTR 

0 

05\YES.  60  BACK  F0R  NEXT  CHARACTER 

07125734 

CLD 

0 

1 2\ ( BS )  T0  D 

X0R 

C 

D 

32411616 

TZ0 

D 

f\was  character  <BS)  ? 

FTR 

0 

1 6\ YES  »  SKIP 

07615734 

CLD 

0 

6 1 \ ( /  )  T0  D 

X0R 

C 

D 

32411460 

TZ0 

D 

f\was  Character  t / >  ? 

BTR 

0 

17\YES,  60  BACK  AND  RESTART 

07335734 

CLD 

0 

3  3  \  (  •  )  T  0  D 

X6R 

C 

D 

32411603 

TZ© 

D 

f\was  Character  ( . )  ? 

FTR 

0 

03\YES,  SKIP  6VER  MULTIPLY 

07120527 

CLD 

0 

1 2\ 1 0  (DEC)  T0  D 

lrc 

e 

27\l® ad  repeat  counter  fqr  multiply 

15414332 

MPS 

D 

a\iob  t©  b 

ADM 

c 

B\10B  ♦  B  T0  B 
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00716 

14614455 

BTR  0  1 6\G0  BACK  F0R  NEW  CHARACTER 

CIL  L  LMNCrEmENT  L 

0  07  1 7 

36054606 

ST T  PF  5\ ( DEC  I M  AL  P0 1  NT  INDICATOR) 

CPI  o  nnclear  s 

00720 

32271603 

TZ0  BSXF\D0ES  B  »  0  ? 

FTR  0  03\YES,  60  DIRECTLY  T0  STORE 

00721 

46214602 

CPL  B  A\B  T9  A  F0R  NORM AL I Z AT  I 0N 

CPL  0  BNCLEAR  B 

00722 

03215063 

SIC  2  ANNORKALTZE  INTEGER 

CPX  N  C\N  TS  C 

00723 

05275336 

LRC  0  27 

ADX  C  NNNUMEER  SHIFTED  (ACTUAL  SCALE) 

00724 

21512166 

STW  5  ANST0RE  INTEGER 

STW  6  N\ST0RE  (ACTUAL  SCALE) 

00725 

14524605 

BTR  0  25\G©  PACK  FOR  ANOTHER  CHARACTER 
CPL  0  LNCLEAp  L 

00726 

32231615 

TZ©  B  XF\FRACTl0N  «  0  7 

FTR  0  l5\YES#  SKIP 

00727 

05273505 

LRC  0  27\L0AD  REPEAT  COUNTER  FOR  DIVIDE 
TCF  PF  5\ I S  THERE  A  FRACTlHN  ? 

00730 

16142166 

FTR  0  14\N0,  SKIP 

STW  6  NNST0RE  (ACTUAL  SCALE) 

00731 

41752753 

ADF  P  LNL0CATI0N  OF  io**l  T ©  L 

ld  l  c\io**l  tw  c 

00732 

45121606 

exc  a  b\b  to  a  for  divide 

FTR  0  06\SK I p  OVER  TABLE 

00733 

77777766 

7777 

7  766\ 1 0*  *  1 

00734 

77777634 

7777 

7634\ 1 0**2 

00735 

77776030 

7777 

6030\1 0**3 

00736 

77754360 

7775 

4360\10**4 

00737 

77474540 

774  7 

4540\10**5 

00740 

74136700 

7413 

6700\10**6 

00741 

17312366 

D VS  C  a\AB/ 1 0 ( DEC )  T0  B  REMAINDER  T@ 

ldw  6  n\actlal  SCALE  T0  n 

00742 

66622351 

SSL  ROM  B\SH1FT  B  ROM  (ACTUAL  SCALE) 
LDW  5  AUNTEGER  TO  A 
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00743 

00744 

00745 

00746 

00747 

00750 

00751 

00752 

00753 

00754 

00755 

00756 

00757 

00760 

00761 

00762 

00763 

00764 

00765 

00766 

00767 


43122152 

23520000 

23615411 

23336311 

55313751 

16025411 

46166662 

16122336 

60164601 

13312336 

32171607 

26741244 

02006040 

07604643 

07320000 

10230000 

10240000 

14040000 

00003706 

54226322 

23142174 


ADM  A  B\C0MBInC  INTEGER  AND  FRACTI0N 
STM  5  B 

LDW  5  B\L0AD  NUMBER  INT0  B 
NkP 

LDW  6  A\ACTLAL  SCALE  T®  A 
CDL  A  A \ * 

LDW  3  C\DESIRED  SCALE  T0  C 

CCL  A  A\ *  *  2S  C0MPLIMENT  0F  A  T0  A 

ADL  C  A\DESIRED  SCALE-ACTUAL  SCALE  T®  A 
TCT  A  1\IS  DESIRED  SCALE-ACT  SCALE  P®S I T I V  E  2 

FTR  0  O2\N0,  SKIP  T 0  SHIFT  LEFT 
CDL  a  A\DECrEmENT  a 

CPL  A  N\C0P Y  A  T0  N 

SSL  R0M  BvSWIFT  B  R0M  N  PLACES 

FTR  0  1 2\G0  T 0  POSITIVE  NEGTIVE  TEST 
LDW  3  N\DESIRED  SCALE  T@  N 

CCX  A  N\ ABS6 LUTE  VALUE  0F  SCALE  T0  N 
CPL  Q  ANCLEAR  A 

SDL  L0L  A\SHIFT  AB  LEFT 
LDW  3  NNDESIRCD  SCALE  T0  N 

TZ0  A  SXF\D6ES  A  ■  0  ? 

FTR  M  07\YES»  T&  POSITIVE  NEGATIVE  TEST 
LDI  P  D\N0, 

SEL  D  D\***»*  ***** 

0200 

6040 

CLD  0  60 
CPL  D  C 

CLD  0  32\TYPE  ISP)  AND  (?) 

N0P 

DTR  2  C 
N0P 

DTR  2  D 

N@P\*****  +  ♦♦♦♦  ***** 

BTR  0  7 3\G0  BACK  T0  START 
N3P 

N0P 

TCT  PF  6\ I S  NU  8ER  PMSITIVE  2 
CDL  B  B\N0, 

CCL  B  B\2S  C0MPLIMENT  0F  NUMBER  T0  B 
LDW  1  D 
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STW  7  D\HA (N  PROGRAM  RETURN  ADDRESS  T0  NS  7 


00770 

23052323 

LDWO  L\  1ST  LOCATION  0F  .STORAGE*  T0  L 

LDW  2  C\0RIG1N|L  TOGGLES  TO  C 

00771 

26742651 

LDI  L  A 

— 

00772 

20712651 

2071 

2651VM0VE  W0RkTNG  STORAGE 

00773 

52440604 

CIX  D  dxback  to  working  storage 

EMP  D 

00774 

31661476 

TMF  6  6 

00775 

23752171 

LDW  7  LXRETLRN  ADDRESS  TO  L 

STW  7  A\WS7  tO  WS7 

00776 

10006500 

DTR  0  Q\DISC0NNECT  TYPEWRITER 

COM  0  Q\UNL6CK  COMMUTATOR 

00777 

70570273 

00000000 

CPF  L  PXRETLRN  ADDRESS  TO  P 

CTS  7  CXRESET  MRIGINaL  tSggles 

end  a* 
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PB-440  PROGRAM  ABSTRACT 


PROGRAM  TITLE: 

DECIMAL  OUT  II  (SUBROUTINE) 

PROGRAMMER: 

V.  A.  WAGNER 

DATE: 

27  March  1965 

FUNCTION: 

To  take  a  number  in  the  B  register  (scale  factor  in  the 
N  register)  in  2  s  complement  format  and  output  it  in 
decimal  form. 

DESCRIPTION: 

The  micro  coded  Decimal  Out  II  is  located  from  500  to 
621  octal.  All  storage  used  is  contained  in  these  locations. 
Output  device  is  optional,  the  operator  may  choose  the 
typewriter  or  any  other  device  on  line  by  a  coded  com¬ 
mand  word  in  the  calling  sequence.  ( SEE  BELOW. ) 

OPERATING  PROCEDURE: 

Decimal  Out  II  is  called  using  the  following  calling 
sequence: 

LDI  P  L 

EXC  P  L 

OCT 

X0Y00500 

X  equals  either  0  or  4.  If  X  equals  4,  the  routine  does 
not  select  any  device  or  lock  the  commutator;  this  must 
be  done  by  the  programmer  before  the  routine  is  called. 
If  X  equals  0,  the  routine  will  select  the  typewriter  for 
output  on  channel  3  and  will  output  its  information  on 
the  typewriter.  Y  equals  0  through  7  octal.  For  a  listing 
of  what  effect  this  has,  see  attached  page. 

REGISTERS: 

Decimal  Out  II  uses  all  the  registers  and  in  general  de¬ 
stroys  their  contents  or  makes  them  meaningless. 

FLAGS: 

Effectively  none;  however,  uses  PF  6  to  determine  if 
finished  or  not. 

SENSE  SWITCHES: 

None  used 

PROGRAM  HALTS: 

None 

COMMUTATOR: 

Unlocked  at  the  end  of  this  routine.  If  typewriter  was 
selected,  it  is  still  selected  at  the  end  of  this  routine. 

Y  EQUALS 

0 

1 

2 

3 

4 

5 

6 

7 

OUTPUT 

nnnnnnn . nnnnnn 

nnnnnnn . nnnnn 

nnnnnnn . nnnn 

nnnnnnn . nnn 

nnnnnnn . nn 

nnnnnnn . n 

nnnnnnn . 

nnnnnnn 
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DECIMAL  OUT  II  (SUBROUTINE) 


136 


137 


L8C\e  500 


00500  46741610 

00501  00000000 

00502  00000000 

00503  00000000 

00504  00000000 

00505  00000000 

00506  00000000 
00507  00000000 

00510  00000000 

00511  23032104 

00512  24432313 

00513  24432115 

005  f  4  46452674 

005 1 5  23132453 

0051  <5  52440604 

00517  3j  77  1476 
00520  77732123 

00521  21312U2 


LDR\******A************* 

ldr\decimal  output  ii 

LDR\V.  WAGNER 

LDR\ ******************** 

C PL  P  D\1ST  LOCATION  OF  WSTORAGE  TO  D 
FTR  0  l 0\SK I p  OVER  WSTORAGE 

0000\*****  WSTORAGE  ***** 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

.0000 

0000 

0000 

0000 

0000\*****  WSTORAGE  ***** 

ldw  o  c\wso  Te  c 

ST W  0  D\1ST  LeC  OF  WSTORAGE  TO  WSO 

ST  I  D  c\WSO  TO  iSfTecTtF  WSTORAGE- 
LDW  1  C\WS1  TO  _C _ 

STI  D  C\WS1  Tg  NEXT  L@C  -OF  WST0RGE 
STW  1  L\RETURN  ADDRESS  TO  WS1 

CPL  D  L\***  --*■  *** 

LDI  P  D  _ _ _ 

2313 _ _ 

2453NM0VE  THE  BEST  OF  WS 

CIX  D  D\TO  WST&RAGE 

EMP_ D _ _ _ _ 

TMF  7  7  _ _ _  _ 

BTR  ol\.*7*  *** 


CFS  7  C 

STW  2  C\S AYE  aCL  IQ8SLES  IN  WS2 
STW  3  a\SAVE  A  IN  W$3 
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STM  4  B\S AVE  B  IN  HS4 


00522 

23155455 

LDM  1  L 

CDL  L  L 

00523 

27540270 

LDM  l  dncall  and  control  word  TO  d 

CTS  7  QXCLEAR  ALL  PF.  TM  AND  CT 

00524 

33773606 

TMT  7  7MNTEGEB  ONLY? 

STT  PF  6\YiS,  SET  PF 6  TRUE 

00525 

30441603 

TNZ  D  SNSELECT  TM  FOR  OUTPUT 

ftr  O3\n0#  skip  over  select 

00526 

26741244 

LDI  P  D\TM  SELECT  M0RD  TO  D 

SEL  D  DVSELECT  TW 

00527 

02006040 

0200XTM  SELECT  WORD 

6040 

00530 

65633402 

COM  6  C\LOCK  C9M  TO  CHANNEL  3 

STF  PF  2\SET  pF2  TRUE 

00531 

32241602 

TZ0  B  S\IS  NUMBER  POSITIVE? 

FTR  02\YE$.  SKIP  COMPLIMENT 

00532 

54226322 

CDL  B  B 

CCL  B  B\2'S  COMPLIMENT  SF  B  TO  B 

00533 

36010000 

STT  PF  1 \SET  PFI  TRUE 

N0P 

00534 

46011321 

CPL  Q  ANCLEAR  A 

SDL  2  AVSEPARATE  INTEGER  AND  FRACTION 

00535 

21620711 

STM  6  BVST0RE  FRACTION 

cld  e  unclear  d  exponent 

00536 

63434612 

CCL  D  C\2'S  CeflPLlMENT  OF  10  (DEC.)  T@  C 
CPL  A  BMNTEGER  TO  B 

00537 

46751610 

CPL  P  L\1 ST  LOC  OF  NSTORAGE  TO  L 

FTR  O  1 0\SK I p  OVER  NSTORAgE 

00540 

00000000 

0000\*****  NSTORAGE 

0000 

00541 

00000000 

0000 

0000 

00542 

00000000 

0000 

0000 

00543 

00000000 

0000 

0000 

00544 

00000000 

0000 

0000 

00545 

00000000 

0000 

0000 
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00546 

00547 

00550 

00551 

00552 

00553 

00554 

00555 

00556 

00557 

00560 

00561 

00562 

00563 

00564 

00565 

00566 

00567 

00570 

00571 

00572 


oooooooo 

0000 

0000 

00000000 

0000 

0000\*****  NST0RAGE  ***** 

05274601 

LRC 

©  27\LRC  F0R  DIVIDE 

C  PL 

0  AXCLEAR  A 

17312451 

D  VS 

C  A\AB/1 0  T 0  B  REMAINDER  T0  A 

STI 

L  A\ST0RE  REMAINDER  IN  NST0RAGE 

52443023 

CIX 

D  DMNCREmENT  M0DE 

TNZ 

B  XR\B  »0? 

14740000 

BTR 

N6P 

03\n@,  g9  back  t©  Divide  again 

45430760 

EXC 

D  C\SAVE  M0DE 

CLD 

0  60\SPACE  T0  D 

37010750 

TCT 

PF  1\WAS  NUMBER  NEG? 

CLD 

0  40\YES,  *  T9  D 

24540760 

STI 

L  DXST0RE  SIGN  IN  NST 0RAGE 

CLD 

M  60\SPACE  TR  D 

45430000 

EXC 

N0P 

D  CNSPACE  T0  C  M0DE  BACK  T0  D 

33771602 

TMT 

7  7VM0DE  .  71 

FTR 

02\YES,  SKIP  SPACE  FILL 

24535244 

STI 

L  C\ST©RE  SPACE  IN  NST9R AGE 

CIX 

D  DMNCREmENT  M0DE 

14750000 

BTR 

N0P 

O2\L00  P 

05066366 

LRC 

06 

CCL 

N  N\-7  Tfi  N 

54552754 

CDL 

L  L\LAST  L0C  0F  NST0R AGE  T0  L 

LDM 

L  D\LAST  L0C  9F  NST0RaGE  T0  D 

10240000 

DTR 

NMP 

2  D\0UTPUT  NST0RAGE 

32621601 

TZ0 

N  X\N  mOl 

FTP 

01XYES  SKIP 

14745266 

BTR 

O3\L00P 

CIX 

N  NXINCRFmENT  N 

37061612 

TCT 

PF  6\I NTEgER  ENLY? 

FTR 

0  12\YES,  SKIP  FPACTI0N  C0MPUTAT 

23150733 

LDW 

1  L\***  1 

CLD 

0  33\< •  )  T©  D 

10240000 

DTR 

Nep 

2  DX0UTFUT  (.) 
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00573 

00574 

00575 

00576 

00577 

00600 

00601 

00602 

00603 

00604 

00605 

00606 

00607 

00610 

00611 

00612 

00613 

00614 

00615 


54550505 

CDL 

L  L\***  l 

LRC 

05\***  2 

27536066 

LDM 

L  C\C0NTR@L  W0RD  T 0  C 

OCX 

N  n\-6  t£  N 

23620712 

LOW 

6  B\FRAC  T I 0N  T0  B 

CLD 

0  1 2\  1 0  (Dtc.)  T0  D 

53630000 

AD  X 

N  C\C0NjReL  W9RD-6  T0 

C 

N0P 

32321603 

TZ0 

C  X\D0NE? 

FTR 

03\YES»  SKIP 

05274601 

LRC 

0  27\LRC  F®R  MULTIPLY 

CPL 

0  a\clear  X 

15415233 

MPS 

D  A\10B  T 0  AB 

CIX 

C  CMNCREMENT  c 

U731021 

BTR 

O4\L00P 

DTR 

2  A\0UTPUT  A 

37021000 

TCT 

PF  2\D I D  TRIS  R0UTINE 

SELECT  TW? 

DTR 

0  UNYES,  DISCONNECT  TW 

23142174 

ldw 

1  D  \  *  * 

STW 

7  DNRETLRN  address  T0 

WS  7 

23052323 

ldw 

0  L\ 1ST  LpC  ©F  WST0RAGE  T0  L 

ldw 

2  C\** 

02732331 

CTS 

7  C\RESET  ALL  IM,  PF, 

AND  CT 

LDW 

3  a\RESET  A 

23420000 

ldw 

4  BNRESET  B 

N0P 

26742653 

LDI 

P  D\»**  ---  *** 

LDI 

L  C 

20732653 

2073 

2653NM0VE  WSTeRAGE  0-6 

52*40604 

CIX 

D  D\BACK  t©  WS  0-6 

E  P 

D 

31661476 

tmf 

6  6 

BTR 

Cl\***  •** 

23752173 

LDW 

7  l\retlrn  address  T0 

L 

STW 

7  C\WST6Ra(SE  7  T 0  WS 

7 

65004657 

C0M 

0  Q\UNL0Ck  C0M 

CPL 

L  PVRETURN 

00000000 

end 

A* 

141 


PB-440  PROGRAM  ABSTRACT 


TYPE  OF  PROGRAM: 
PROGRAM  TITLE: 
PROGRAMMER: 

DATE: 

ID: 

FUNCTION: 

GENERAL  DESCRIPTION: 


LOADING  PROCEDURE: 
OPERATING  PROCEDURE  & 
LINKAGE  REQUIRED: 


MICRO  SUBROUTINE 
MICRO  TYPE 
D.  R.  GUM 
1  February  1965 
None 

The  purpose  of  this  program  is  to  provide  an  efficient 
means  of  outputting  program  comments  via  the  type¬ 
writer. 

This  program  is  a  micro  coded  subroutine  for  use  with 
micro  or  SCS  programs.  The  program  types  out  charac¬ 
ters  which  are  stored  sequentially  in  memory  four  charac¬ 
ters  per  word.  The  program  requires  the  starting  location 
of  the  characters  in  memory  and  the  total  number  of 
words  to  be  typed. 

Load  with  Binary  Loader  I.  This  program  is  relocatable. 
The  program  operates  as  a  subroutine  of  another  pro¬ 


gram.  A  typical  micro  calling  sequence  is  shown  below. 

LDI  P  C 
EXC  P  C 
0000 

0450  Micro  Type  Address 


H 


Total  Number  of  Words 


Starting  Address  of  Words 


The  micro  type  address  may  be  stored  in  working  storage 
and  the  routine  called  as  follows. 

LDW  O  C 
EXC  P  C 


Total  Number  of  Words 
Starting  Address  of  Words 
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PROGRAM  STORAGE: 

Core 

Biax 

INTERMEDIATE  STORAGE: 
EXECUTION  TIME: 
REGISTERS: 

SENSE  SWITCHES: 
PROGRAM  FLAGS: 


Program  Segment 

Micro  Type 

None 

None 

N/A 

All  except  B 

None 

None 


Octal  Locs. 
450-461 


Total 

128 
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MICRO  TYPE 


144 


Load  from 
L  to  A 

x 

N  =  N-  1 

x 

Shift  A 
Left  Six 

x 

Increment 

D 

Exponent 


145 


00450 

00451 

00452 

00453 

00454 

00455 

00456 

00457 

00460 

0046  1 


LDR\MICR9  ?YPE 
LDR\l  FEB  1965 


27352636 

65632671 

02006040 

12114604 

26515466 

67115244 

10210000 

31031475 

30621473 

65014537 

00000450 


L0C  0  450 

LDM  C  LVBEGINNING  ADDRESS  I NT0  L 
LDI  C  N\NUMbER  0F  WORDS  INTO  N 

C®M  6  c\L0CK  cSM 
LDI  P  A 

0200NSELECT  w@Nd 
6040 

SEL  A  ANSELECT  F0R  TYPE  OUT 
CPL  0  D\D  *  0 

LDI  L  A\L0AD  fK@M  L  T0  A 
CDl  N  N\N  *  N  i  1 

SLS  A  ANSHIFT  LEFT  SIX 
Cix  D  D\INCREm£NT  D  EXP0NENT 

DTR  2  A\0UTPUT  LAST  SIX  BITS  @F  A 
N0P 

TMF  0  3\M0DE  BfTS  0F  D  «  3? 

BTR  2\N0 

TNZ  N  X\YES.  N  «  0? 

BTR  4\N0 A  PjCK  UP  NEW  W0RDS 

C@M  0\  A4YES*  UNLOCK  C0M 
EXC  C  PNRETURN  T@  PROGRAM 

LDR 

ldr 

END  0  450 
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PB-440  PROGRAM  ABSTRACT 


TYPE  OF  PROGRAM: 
PROGRAM  TITLE: 
PROGRAMMER: 

DATE: 

ID: 

FUNCTION: 

GENERAL  DESCRIPTION: 


LOADING  PROCEDURE: 
OPERATING  PROCEDURE  & 
LINKAGE  REQUIRED: 


MICRO  SUBROUTINE 
MICRO  PRINT 
D.  R.  GUM 
1  February  1965 
None 

The  purpose  of  this  program  is  to  provide  an  efficient 
means  of  outputting  program  comments  via  the  Datamark 
printer. 

This  program  is  a  micro  coded  subroutine  for  use  with 
micro  or  SCS  programs.  The  program  types  out  charac¬ 
ters  which  are  stored  sequentially  in  memory  four  charac¬ 
ters  per  word.  The  program  requires  the  starting  location 
of  the  characters  in  memory  and  the  total  number  of 
words  to  be  printed. 

Load  with  Binary  Loader  I.  This  program  is  relocatable. 
The  program  operates  as  a  subroutine  of  another  program. 

A  typical  micro  calling  sequence  is  shown  below. 

LDI  P  C 
EXC  P  C 
0000 

0400  Micro  Print  Address 


Total  Number  of  Words 


* -  Starting  Address  of  Words 

The  micro  print  address  may  be  stored  in  working  storage 
and  the  routine  called  as  follows. 

LDW  O  C 
EXC  P  C 


Total  Number  of  Words 


Starting  Address  of  Words 
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PROGRAM  STORAGE: 

Program  Segment  Octal  Locs.  Total 

Core 

Micro  Print  400-426  27 8 

Biax 

None 

INTERMEDIATE  STORAGE: 

None 

EXECUTION  TIME: 

N/A 

REGISTERS: 

All 

SENSE  SWITCHES: 

None 

PROGRAM  FLAGS: 

None 
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MICRO  PRINT 


(  START  J 

T 


Delay 

256  ft  Sec. 


Set  L,  N,  &  C 
to  Beg.  No. 
and  Return 


150 


151 


00400 

00401 

00402 

004o3 

0040^ 

00405 

0040^ 

00407 

004  10 

00411 

00412 

00413 

004  1 4 

00415 

00416 

00417 

00420 

00421 

00422 


ldr 

4 

LDR 

\ 

0 

LOC  0 

400 

60066600 

CCX  G 

N 

0 

SSL  0 

0 

27352636 

LDm  C 

L 

\ 

0 

LDI  C 

N 

0 

21736562 

STW  7 

C 

4 

C0M  6 

B 

4 

37  43  l6o3 

TCT  IL 

.  3 

4 

FTR 

3 

26711211 

LDI  P 

A 

SEL  A 

A 

4 

22004000 

2200 

4 

4000 

10210000 

DTR  2 

A 

4 

NOP 

07042651 

CLD 

4 

4 

LDI  L 

A 

4 

67  1 15444 

SLS  A 

A 

4 

cdl  d 

D 

4 

26725612 

LDI  P 

B 

AND  A 

B 

0 

00000077 

0000 

0077 

26735723 

LDI  P 

C 

XOR  B 

C 

\ 

4 

00000052 

0000 

0052 

30311603 

tnz  c 

F 

0 

FTR 

3 

i 

27721062 

ldm  p 

B 

0 

DTR  6 

B 

0 

00000060 

0000 

0060 

44031023 

CIL  Q 

C 

DTR  2 

C 

0 

10210000 

DTR  2 

A 

0 

Nep 

30411465 

TNZ  D 

F 

0 

BTR  0 

12 

0 
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MICR0  PRINT 
1  FEB  1965 

256  MICR0SEC0ND  DELAY 

BEGINNING  ADDRESS  INTe  L 
NUMBER  0F  WORDS  I NT0  N 

STORE  RETURN 
LOCK  COM 

TEST  interrupt  line  3 

SELECT  0N  CH.  2 
SELECT  WORD 

OUTPUT  SLEW  CHARACTER 

D  s  4 

LOAD  FROM  L  TO  A 

SHIFT  LEFT  SIX 
d  :  D  -  1 

mask  last  six  bits  of  ; 

XOR  WITH  CR  CODE 

CARRIAGE  return? 

N0 

YES 

PRINT  SPACE  WITH  EOM 

output  slew  Character 

OUTPUT  CHARACTER 

D  «  0? 

NO 


00<23  54663Q62 


Yet.  N  ,  N-l 

N  .  0? 


CDL-W-W - * 

TNZ  N  x  t 


00424  14620000  BTR  0  15  t  NO.  PICK  UP  NEW  WORD 

- NOP - 

00425  — 6 50 1 0000 - CON - q - 4  A* - UNLOCK-CON - 

NOP 


00426  23734537  LDW  7  c 

EXt  C  P  - RETURN— 1 

— — — - LDR 

ldr 

00000400  END  0  400 
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Appendix  III. 

RAYTHEON  440  MICRO  COMMAND  UST 


MNEMONIC 

OCTAL 

ADF 

41 

ADL 

55 

ADM 

43 

ADS 

73 

ADX 

53 

AFK 

40 

ALC 

51 

AMK 

42 

AND 

56 

BTR 

14 

CCF 

71 

CCL 

63 

CCM 

62 

CCS 

61 

CCX 

60 

CDL 

54 

CFS 

77 

CIL 

44 

CIX 

52 

CLD 

07 

CLP 

04 

COM 

65 

CPF 

70 

CPL 

46 

CPM 

47 

CPS 

72 

CPX 

50 

CTS 

02 

DTR 

10 

DVS 

17 

EMP 

06 

MEANING 

Add  fractions 
Add  logical 
Add  magnitudes 
Add  signs 
Add  exponents 
Add  fractions  with  carry 
Add  logical  for  carry 
Add  magnitudes  with  carry 
Logical  product 
Backward  transfer  relative 
Copy  complement  fraction 
Copy  complement  logical 
Copy  complement  magnitude 
Copy  complement  sign 
Copy  complement  exponent 
Copy  decrement  logical 
Copy  from  special  storage 
Copy  increment  logical 
Copy  increment  exponent 
Copy  literal  to  Deregister 
Copy  literal  to  P-register 
Commutator  control  (I/O) 
Copy  fraction 
Copy  logical 
Copy  magnitude 
Copy  sign 
Copy  exponent 
Copy  to  special  storage 
Data  transfer  (I/O) 

Divide  step 
Execute  micro  pair 
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MNEMONIC 

OCTAL 

EXC 

45 

FTR 

16 

HLT 

01 

LDI 

26 

LDM 

27 

LDS 

22 

LDW 

23 

LOR 

64 

LRC 

05 

MPS 

15 

NOP 

00 

SDL 

13 

SEL 

12 

SFR 

11 

SL6 

67 

SLC 

03 

SSL 

66 

STI 

24 

STM 

25 

STF 

34 

STS 

20 

STT 

36 

STVV 

21 

TCF 

35 

TCT 

37 

TMF 

31 

TMT 

33 

TNZ 

30 

TZO 

32 

XOR 

57 

MEANING 

Exchange 
Forward  transfer 
Halt 

Load  and  increment 
Load  from  memory 
Load  from  special  storage 
Load  from  working  storage 
Logical  “OR” 

Load  repeat  count  (N  Register) 
Multiply  step 
No  operation 
Shift  double  length 
Select  (an  I/O  device) 

Shift  floating  right 

Shift  left  six 

Shift  left  and  count 

Shift  single  length 

Store  and  increment 

Store  into  memory 

Set  toggle  false 

Store  into  special  storage 

Set  toggle  true 

Store  into  working  storage 

Test  condition  false 

Test  condition  true 

Test  mode  bits  (of  D  register) 

Test  mode  bits  (of  D  register) 

Test  non-zero 

Test  zero 

Exclusive  “OR” 


false 

true 
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Appendix  IV. 

RAYTHEON  440  SYSTEMS  COMMAND  SET  LIST 


1.  DATA  TRANSMISSIONS 


MNEMONIC 

ENA 

ENB 

LAC 

LBC 

LDA 

LBD 

MOV 

PDQ 

SAA 

SAB 

STA 

STB 

STZ 

XAB 

ZTS 

2.  ARITHMETIC 

ADA 

ADB 

CLA 

CLB 

DIV 

DMO 

IMO 

INA 

INB 

MPY 

RAD 

RSB 

SBA 

SBB 


MEANING 
Enter  A-register 
Enter  B-register 

Load  A-register  with  complement 
Load  B-register  with  complement 
Load  A-register 
Load  B-register 
Move  (A  block  of  data) 

Push  down  QUEUE 

Store  address  field  of  A-register  into  memory 

Store  address  field  of  B-register  into  memory 

Store  A-register  into  memory 

Store  B-register  into  memory 

Store  zero  into  memory 

Exchange  A  and  B  registers 

Zeros  to  memory 


Add  memory  to  A-register 
Add  memory  to  B-register 
Clear  A-register 
Clear  B-register 

Divide  AB  registers  by  memory 
Decrement  memory  by  one 
Increment  memory  by  one 
Increment  A-register 
Increment  B-register 
Multiply  B-register  by  memory 
Replace— Add  A-register  and  memory 
Replace— Subtract  A-register  form  memory 
Subtract  memory  from  A-register 
Subtract  memory  from  B-register 
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3.  TRANSFERS 


MNEMONIC 

MEANING 

RET 

Return  (indirect  jump) 

TAP 

Transfer  if  A-register  positive 

TAZ 

Transfer  if  A-register  zero 

TBP 

Transfer  if  B-register  positive 

TBZ 

Transfer  if  B-register  zero 

TOV 

Transfer  if  overflow  is  indicated 

TRA 

Unconditional  transfer 

TSR 

Unconditional  transfer  and  set  return 

4.  COMPARES  AND  SKIPS 

CAE  Skip  next  command  if  A-register  equals  memory 

CAG  Skip  next  command  if  A-register  greater  than  memory 

CAL  Skip  next  command  if  A-register  less  than  memory 

CAM  Skip  next  two  commands  if  A-register  greater  than  memory; 

skip  next  command  if  A-register  less  than  memory 

CBE  Skip  next  command  if  B-register  equals  memory 

CBG  Skip  next  command  if  B-register  greater  than  memory 

CBL  Skip  next  command  if  B-register  less  than  memory 

CME  Skip  next  command  if  A-register  equals  memory  masked  by  B-register 


SMP 

Skip  next  command  if  memory  is  positive 

SMZ 

Skip  next  command  if  memory  equals  zero 

TLU 

Table  look-up 

SHIFTS  and 

LOGICAL 

AND 

Logical  product  of  memory  and  A-register 

CMA 

Complement  A-register 

CMB 

Complement  B-register 

LOR 

Logical  sum  of  memory  and  A-register 

RLA 

Shift  A-register  left  circular 

RLB 

Shift  B-register  left  circular 

RLC 

Shift  AB-registers  left  circular 

SLA 

Shift  A-register  left  open 
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5.  SHIFTS  and  LOGICAL  —  (continued) 


MNEMONIC 

SLB 

SLC 

SRA 

SRB 

SRC 

SSU 

XOR 

6.  INDEXING 

ATX 

BTX 

DXT 

ENX 

INX 

IXS 

LDX 

STX 

TSX 

XTA 

XTB 


MEANING 

Shift  B-register  left  open 
Shift  AB-registers  left  open 
Shift  A-register  right  open 
Shift  B-register  right  open 
Shift  AB-registers  right  open 

Selective  substitute  of  bits  in  A-register  and  memory 
Exclusive  "OR”  of  memory  and  A-register 


A-register  to  index  register 
B-register  to  index  register 

Decrement  index  register  and  transfer  if  non-zero 
Enter  index  registers 
Increment  index  register 

Increment  index  register  by  one  and  skip  next  command  if  index 
register  equals  specified  literal 

Load  index  register 

Store  index  register 

Transfer  and  set  index  register  to  address  of  next  command 
Index  register  to  A-register 
Index  register  to  B-register 


7.  FLOATING  POINT  (16,  24,  or  39  bit  mantissa) 


FAD 

Floating  add 

FDV 

Floating  divide 

FIX 

Fix  (a  floating  point  number) 

FLD 

Floating  load 

FLT 

Float  (a  fixed  point  number) 

FMP 

Floating  multiply 

FSB 

Floating  subtract 

FST 

Floating  store 

FTO 

Floating  transfer  on  overflow 
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8.  SPECIAL 


MNEMONIC 

MEANING 

EMP 

Execute  micro  pair 

NOP 

No  operation 

HLT 

Halt  and  transfer 

MRC 

Micro  subroutine  call 

DML 

Descend  to  micro  level 

CLM 

Compare  limits 

SCS 

Set  control  sequence 
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